Andfew Nelson gastou os últimos dezoito meses 
concebendo programas e jogando jogos de aven¬ 
turas em computador. Neste livro eie partilba con¬ 
sigo as suas descobertas e segredos. Graças a 
estas informações você poderá criar também as 
suas próprias aventuras no seu computador pes¬ 
soal. E, além disso, encontrará, já prontas a se¬ 
rem «vividas», algumas aventuras emocionantes: 
Os Lobisomens e o Aventureiro, O Desastre Asi- 
moviano, A Cidadela de Pershu. 

Só falta você decidir-se. Andrew espera-o, para 
partir consigo à aventurai... 
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Porque razão quererão pessoas inteligentes, com acesso a 
computadores muito potentes que poderiam fazer algo de útil, 
aplicar as suas capacidades mentais a problemas de criação e ex¬ 
ploração de paisagens míticas? Porque razão quando o compu¬ 
tador poderia estar a ajudar-nos a conhecer a nossa conta bancá¬ 
ria, o obrigamos a comandar um jogo durante o qual lutamos 
contra horríveis e violentos monstros em cavernas labirínticas, 
fazemos invocações mágicas, e descobrimos fabulosos tesouros? 

A resposta é óbvia. Usar o computador para fazer coisas sé¬ 
rias o tempo todo é muito simplesmente aborrecido. Caminhar 
por paisagens maravilhosas, cortar pessoas às fatias com espa¬ 
das afiadas, enfrentar criaturas humano ides em tabernas de ou¬ 
tros mundos, parece ser para muitas pessoas uma maneira muito 
melhor de gastarem o seu tempo e o computador que têm. 

Se isto se aplica a si, terá aqui um bom livro. 

Andrew Nelson gastou os últimos dezoito meses concebendo, 
programando e jogando jogos de Aventuras em computador. 
Neste livro, partilha consigo as suas descobertas e segredos. Ar¬ 
mado com estas informações, o leitor poderá dentro em pouco 
criar magníficos jogos de A venturas no seu computador . 

Além das informações gerais sobre o modo de o fazer, o livro 
contêm já algumas aventuras prontas a jogar: 

* Os Lobisomens e o A ventureiro 

* O Desastre Asimovíano 

* A Cidadela de Pershu 

i* 

E tempo de ir buscar a armadura, meter num saco algumas 
poções mágicas, e lançar-se à aventura com Andrew, 

Tim Hartneíl, 
Londres, 1983 

Tim Hartneíl é autor de mais de 30 livros sobre microcompu¬ 
tadores e programação, alguns dos quais disponíveis em língua 
portuguesa. 
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ONDE ESTÁ O ANEL MÁGICO? 


Enfrentemos a verdade. A vida pode ser muito aborrecida. Na 
minha cidade nào existem muitos dragões esperando ser desafia¬ 
dos, e as arcas cheias de ouro esquecido parecem ter desapareci¬ 
do ultimamente. Já nem me lembro da última vez que encontrei 
um Mago Bom no supermercado, e há muito tempo que não dis¬ 
cuto lácticas de combate com andróides no café da esquina. 

A fome da aventura está presente em todos nós. O desejo de 
assumir a personalidade mais vibrante, de outras pessoas — 
mesmo que apenas durante uma hora — é bastante comum. Se 
bem que você não possa esconjurar diabinhos e lobisomens, in¬ 
vocar os poderes de um Escudo Protector ou empregar duendes 
para transportarem sacos de esmeraldas das ruínas de um castelo 
abandonado, os jogos de fantasia ou, em geral, de aventuras 
permitem-lhe fazer precisamente isso. 

Em Inglaterra e nos Estados Unidos desenvolvem-se desde há 
vários anos os jogos designados por «Dungeons and Dragons» 
(«Masmorras e Dragões»), tendo-se afirmado que se trata do jo¬ 
go de desenvolvimento mais rápido no mundo. Juntamente com 
outros tipos de jogos, como os de estratégia (militar ou não) for¬ 
mam um grupo de jogos modernos que se tem desenvolvido nes¬ 
ses países e começou já a penetrar em alguns outros (França, 
Alemanha...). Mas nos primeiros dois países é enorme a quanti¬ 
dade de pessoas que se dedica a eles. 

Os jogos de fantasia são jogados «tradicionalmente» de dois 
modos: em cartão, como um vulgar jogo de mesa, ou sem esse 
auxiliar sendo esta a forma mais expandida. Os jogadores incar¬ 
nam personagens míticas, chegando a vestir-se como elas, e sob 
a direcção de um árbitro (o Mestre do Jogo), que concebeu o ce¬ 
nário, caminham pelo mundo tendo estranhos encontros e trans¬ 
portando artefactos nào menos estranhos. 
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Estas campanhas «reais» apresentam no entanto uma enorme 
desvantagem. São necessários parceiros para jogar. Ê necessário 
o árbitro, que controla o mundo onde nos movemos, assim co¬ 
mo os inimigos que encontramos e o efeito que sobre eles têm as 
nossas armas e feitiços. Nem sempre é particularmente simples 
conseguir juntar todos estes seres humanos quando decidimos 
lançar-nos à Aventura... 

E é aqui que o computador nos pode ajudar. 

Se bem que os jogos de aventuras para computador não te¬ 
nham a espontaneidade dos seus equivalentes «ao vivo», nem 
certos efeitos pedagógicos relacionados com os métodos empre¬ 
gues nestes (a origem dos jogos dc aventuras está relacionada 
com a psicanálise de grupo), os jogos em computador conse¬ 
guem no entanto ser notavelmente imprevisíveis e agradáveis de 
jogar. O facto de a Hidra de dez cabeças que acabámos de matar 
apenas existir na RAM do nosso computador não parece dimi¬ 
nuir de modo algum a nossa sensação de alívio ao vê-la morta. E 
os tesouros que encontramos um pouco por lodo o lado não são 
de modo algum menos «reais» do que os dos jogos ao vivo... 

Escrevi este livro para mostrar ao leitor quanto é fácil criar jo¬ 
gos de aventuras no seu computador. Existe no entanto um pro¬ 
blema, e espero que o leitor esteja decidido a resolvê-lo junta- 
mente comigo. E bastante difícil começar a explicar a estrutura 
de um jogo de aventuras computadorizado. Descobri que para 
que a informação A tenha algum sentido, já é preciso conhecer a 
informação B... 

Neste livro fiz tudo o que me foi possível para lhe transmitir as 
informações «A» de um modo que as torne compreensíveis sem 
as «B»; mas por vezes foi impossível faze-lo. Apenas lhe posso 
pedir que prossiga a leitura. As explicações que nào forem claras 
quando as ler pela primeira vez acabarão por adquirir significa¬ 
do à medida que for avançando no livro. 

Escrevi esta obra mantendo sempre presente a antiga máxima 
chinesa... UM PROGRAMA VALE MIL PALAVRAS. O leitor 
aprenderá muito mais introduzindo um programa na máquina, 
ou um fragmento dele, e executando-o, do que lendo as explica¬ 
ções dadas em cada novo capítulo. Nestas condições, o livro é 
concebido em função dos programas. Contém três programas 
principais (incluindo algumas variantes), e a parte de instruções 
do livro baseia-se nesses programas. De facto, se o leitor desejar 
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apenas ter mais alguns programas para jogar, pode limitar-se a 
introduzir na máquina as listagens tais como estão, ignorando as 
«lúcidas» explicações que os rodeiam... 

No entanto, como é óbvio, se actuar deste modo terá ignorado 
o verdadeiro objectivo do livro. Avance lentamente, mantenha o 
computador ligado enquanto lê, e introduza nele cada pedaço de 
código à medida que lhe surgir; descobrirá assim que daqui a 
pouco tempo será capaz de criar sozinho as suas próprias aven¬ 
turas em computador. 


U 



I 


1 ! 

VOCÊ Ê O HERÓI 


Iniciaremos a nossa investigação dos jogos de aventuras levan¬ 
do o leitor a tomar parte numa aventura que não necessita de 
computador. 

A aventura que irá viver — Os Lobisomens e o Aventureiro — 
baseia-se de facto no primeiro programa que iremos introduzir 
na máquina, e utiliza o mesmo mapa, os mesmos monstros, e 
aproximadamente o mesmo texto. 

No entanto, a aventura escrita, que lhe permite tomar decisões 
quanto ao que quer ou não fazer, ou ao lugar para onde deseja 
ir, não é tão agradável como a versão computadorizada que de¬ 
pois desenvolveremos. A principal razão de apresentarmos aqui 
uma aventura em texto consiste em dar ao leitor uma noção do 
que é o jogo de aventuras, em particular aquele que iremos de¬ 
senvolver, sem primeiramente ter de introduzir uma listagem 
longa na máquina. 

Muitos jogos de aventuras utilizam dados para determinar o 
resultado dos combates. Como o leitor talvez não tenha dados à 
sua disposição, a nossa aventura pedir-lhe-á apenas que lance no 
ar uma ou duas moedas e o resultado desse lançamento decidirá 
quem ganhou uma luta, etc, 

É muito simples tomar parte nesta aventura. Basta-lhe seguir 
as instruções, lendo cada secção quando é enviado para ela, e 
passando em seguida à secção indicada. Por exemplo, poderá 
encontrar o seguinte texto: «Chegou a um entroncamento de es¬ 
tradas. Se quer virar à direira passe para 84, e se prefere virar à 
esquerda passe para 12». O leitor deve ler em seguida a secção 
indicada, onde encontrará novas instruções (e novas escolhas) à 
sua espera. Em devido tempo terminará a aventura com êxito ou 
morrerá ao tentar fazê-lo... 

Uma das principais vantagens do uso do computador para jo- 
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gos de aventuras é que este pode ser usado para todas as tarefas 
secundárias. Nestas incluem-se coisas como o lançamento dos 
dados, tomar nota da pontuação obtida, do número dc monstros 
eliminados, dos objectos que se encontram nos vários locais que 
exploramos ou que trazemos no bolso, e a determinação dos re¬ 
sultados de combales. Isto permite-lhe gozar melhor o jogo, as¬ 
sim como usar a imaginação para preencher os pormenores de 
fundo da aventura. 

Infelizmente, o leitor terá de ter todo este trabalho na sua pri¬ 
meira aventura. O único equipamento de que necessitará para 
tomar parte nela será uma caneta e algumas folhas de papel, este 
livro, e duas moedas. 

Vai começar o jogo com S50 em ouro, e uma «força» de 50 
unidades. Esta força diminuirá em certos combates, e a quanti¬ 
dade de ouro e outras riquezas que possui altera-se à medida que 
as encontra no seu caminho, que é roubado, ou que se vê força¬ 
do a pagar a alguém. Se morrer, o jogo termina e a sua força di¬ 
minui para zero. Por vezes lerá: «Você perdeu o combate, a sua 
força diminui para metade». Quando encontrar uma instrução 
assim, divida a sua força actual por dois, e arredonde em seguida 
para o número inteiro mais próximo. Não se preocupe com a 
parte fraccionária. 

Terá de manter um registo actualizado da sua força, da sua ri¬ 
queza e do número de monstros que for eliminando (a que cha¬ 
maremos «inventário de monstros»). No final do jogo poderá 
determinar a sua pontuação, baseada na força que lhe resta, no 
dinheiro que possui e nos monstros que eliminou. 

Por vezes ser-lhe-á dito para sair de uma sala a meio de uma 
instrução. Quando voltar a essa sala depois de executar a ordem 
recebida, leia a parte da instrução que se segue à ordem que o en¬ 
viou nessa «sub-direcção», Se não proceder deste modo, passará 
a vida a ir e voltar para os mesmos sítios... 

O cenário 

Esta aventura, “Os Lobisomens e o Aventureiro” (onde você 
é o Aventureiro, e os lobisomens e outras criaturas igualmente 
desagradáveis habitam o local que você vai visitar), realiza-se 
num antigo castelo abandonado. 

Você descobre a existência do velho castelo numa carta meio 


ilegível que encontra numa arca que lhe foi deixada pelo seu bi¬ 
savô. Infelizmente apenas consegue ler a segunda página da car¬ 
ta pelo que não conhece tudo sobre o assunto. No entanto, a 
partir do que consegue ler nessa página, você compreende que o 
castelo foi abandonado já há séculos depois de ter sido lançada 
uma maldição sobre os seus habitantes por uma velha feiticeira 
que fora expulsa durante uma tempestade particularmente vio¬ 
lenta. A esposa do rei sentia-se doente, e este (erradamente, co¬ 
mo se acabou por verificar) culpou a pobre feiticeira da doença 
da esposa amada. Pensou que expulsando a feiticeira terminaria 
a influência maléfica desta sobre a sua mulher. Infelizmente, po¬ 
rém, tal não aconteceu, e a esposa do rei piorou cada vez mais, 

até que morreu... 

Os seus últimos dias de vida não forem pacíficos. A maldição 
da feiticeira transformou o castelo em moradia de terríveis cria¬ 
turas e fantasmas. Finalmente o rei e a sua corte não consegui¬ 
ram suportar mais e fugiram da região, nunca mais se tendo ou¬ 
vido falar deles! 

As criaturas invocadas pela feiticeira continuaram porém, e 
vivem ainda no castelo. E é você que vai ter de enfrentá-las, na 
esperança de recuperar as fortunas abandonadas pelo infeliz 

rei.,, 

Como já afirmei, o leitor iniciará o jogo com uma quantia de 
$50 (use as unidades que quiser) em ouro, e uma força de 50. Pe¬ 
gue na caneta e numa das folhas, e escreva em três colunas: 

FORÇA RIQUEZA INVENTÁRIO DE 

MONSTROS 

50 50 0 

À medida que progredir no interior do castelo, ajudado pelas 
suas decisões rápidas e pelas suas duas moedas, deverá manter 
esta tabela actualizada. Verificará que pode realizar esta aventu¬ 
ra várias vezes, dado que o resultado será diferente de cada uma 
delas. Registe a sua pontuação final, e veja se consegue melhores 
resultados dc cada vez que tentar. 

Começará directamente pela secção 7. 
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OS LOBISOMENS E O AVENTUREIRO 


1 

Você encontra-se numa masmorra escura e húmida. A sala é 
apenas iluminada através de um pequeno orifício na parede oes¬ 
te. Lance uma moeda: se sair caras, vâ para 11; se não, vá para 
5. Para abandonar a masmorra, passe para 25. 

2 

Você encontra-se no átrio superior do castelo, ern forma de L. 
Junto ao tecto vê mover-se uma traça, atravessando a sala. Para 
norte existe uma porta, assim como uma escada que desce. Se 
quiser espreitar pela porta a norte, vâ para 33. Se quiser olhar 
pela escada, vá para 39. Lance uma moeda: se sair coroa, vá pa¬ 
ra 13. Para passar pela porta, vá para 30. Para descer as escadas, 
và para 21. 

3 

Olhando pela escada, você consegue aperceber-se de uma sala 
escura, de aspecto desagradável: a sala da guarda das antigas 
masmorras. Vá para 21. 

4 

No interior do saco você encontra jóias no valor de $500! 
Acrescente este valor às riquezas que já possui e passe para 9. 

5 

O fantasma do guarda acordou! A sua força diminui para me¬ 
tade devido ao arrepio que sente na espinha.,, Vâ para 1. 

6 

Você encontra-se na Sala Grande do Castelo, A sala tem uma 
forma em L, e possui duas portas. Você nota que os painéis em 
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madeira à volta da sala estão tortos e meios apagados. De súbi¬ 
to, vê um rato atravessar rapidamente o chão. Roda repentina- 
mente sobre os calcanhares ao ouvir um ruído estranho. Lance 
uma moeda; se sair caras, vá para 43, Se sair coroas, você verifi¬ 
ca com grande alívio que não se passa nada de anormal. Se qui¬ 
ser olhar através das janelas para se orientar, vá para 28. Para ir 
para leste, vá para 21. 29 conduzi-lo-á para oeste. 

7 

Você encontra-se à entrada de um castelo em pedra de aparên¬ 
cia misteriosa. Está orientado para leste, A enorme porta de en¬ 
trada, em madeira, está apenas encostada. Para entrar no caste¬ 
lo siga para 40. 

8 

Um lobisomem acorda nesta sala. Quando você entra, ele 
ataca-o. Lance uma moeda. Se for caras, o lobisomem vence-o, 
e você passa para 37. Se for coroas, você conseguiu matá-lo. 
Acrescente um ao seu inventário de monstros, e passe para 35. 

9 

Você encontra-se num vasto armazém, entre especiarias, vege¬ 
tais e muitos sacos de farinha e outras provisões. No ar sente-se 
um cheiro forte a especiarias. Se quiser observar por baixo dos 
sacos, vá para 31. Se quiser ver o que se encontra no saco supe¬ 
rior, vá para 4. Para sair pela porta a sul, passe para 42. Vá para 
35 se quiser sair pela porta a norte. 

10 

Olhando para cima, ao longo da escada, você vê um átrio ele¬ 
gantemente decorado. Vá para 21. 

11 

Neste subterrâneo existem muitos ratos, que lhe roubam moe¬ 
das em ouro num valor de $10, Vá para 1. 
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12 

Você está a descer muito, muito lentamente. A sua força é di¬ 
minuída por um feitiço deixado no elevador. Divida a sua força 
por dois, e passe directamente para 42. 

13 

Você è atacado por um malévolo «MaJdemer». Sente o cheiro 
a enxofre do seu hálito. A sua força diminui de 10. Lance duas 
moedas. Se sair caras em ambas, você matou o monstro e deve 
acrescentar um ao seu inventário de monstros. Depois do com¬ 
bate, passe para 42. 

14 

F 

Conseguiu! E esta a saída do castelo. Duplique a sua força, e 
vá para 27. 

15 

Você encontra-se no antigo elevador hidráulico do castelo. Se 
pretende descer lentamente, vâ para 12. Se quer descer tâo de¬ 
pressa quanto possível, vá para 24. 

16 

Horror! Existe aqui um devastador Dragão do Gelo. O mons¬ 
tro avança em sua direcção. Das suas mandíbulas escorre san¬ 
gue. Lance uma moeda (depressa...). Se sair caras você ganha, 
devendo acrescentar um ao seu inventário de monstros. A sua 
força diminui de 10 se ganhar; ou de 20 se perder. Depois do 
combate passe para 30. 

17 

A sala do conselho privado do rei. No ar pesado parece ouvir- 
-se o eco de antigas disputas verbais. Lance uma moeda. Se sair 
caras, você encontra uma esmeralda com o valor de $100, pas¬ 
sando depois a 21, correspondente à saída pela porta sul. Se sair 


coroas, você è atacado por uma Horrível Coisa que estava escon¬ 
dida atrás dos pesados cortinados. Lance novamente a moeda; 
se sair caras você ganha, somando um ao seu inventário de 
monstros. Se sair coroas, ganha a Horrível Coisa. Enquanto vo¬ 
cê permanece exausto no solo, a Coisa rouba-lhe $100. Passe em 
seguida para 21. 

18 

Esta pequena sala do nível superior é a sala de vestir. Existe 
uma janela virada a norte. Se quiser olhar através dela, vá para 
22. A sul existe uma porta; para a usar vá para 32. 

19 

O ruído é aterrador. Que ser hediondo estará dentro da sala? 

Vá para 23. 

20 

Aha! Está rico! Você encontra um tesouro em pedras precio¬ 
sas e ouro no valor de $900! Some este valor à riqueza que já 
possui, e passe para 30. 

21 

Você encontra-se no átrio interior, que possui uma porta para 
norte, outra para oeste e uma escada circular. A sala é pequena, 
e pouco agradável. Para olhar ao longo da escada, para baixo, 
vá para 3; e para olhar para cima, vá para 10. Para sair da sala 
pela porta norte, vá para 17. Passe para 6 se quiser sair pela por¬ 
ta oeste. Vá para 2 para subir as escadas, ou para 25 para descer 
por elas. 

22 

Olhando pela janela você vê, abaixo de si, o jardim das da¬ 
mas. Olhando para a esquerda, vê com dificuldade a planície 

que atravessou para chegar ao castelo. Agora vá para 18. 
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Você encontra-se na sala antigamente usada para guardar o te¬ 
souro do rei. Vê um aranhiço descer por uma parede. Não exis¬ 
tem janelas, apenas saída para norte e leste. Se quiser escutar na 
porta norte, vá para 19. Se quiser sair por essa porta, vá para 32, 
Se quiser sair pela porta leste, vá para 36. 
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Você sente-se hilariante, pois a sua descida rápida fez actuar 
um feitiço positivo, A sua força é duplicada. Passe agora para 
42. 
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Você encontra-se na sala do guarda das prisões, nos subterrâ¬ 
neos do castelo. A escada termina nesta sala. Existe uma outra 
saída, um pequeno buraco na parede leste. O ar é húmido e desa¬ 
gradável... pelos orifícios entre as pedras do tecto penetra um ar 
frio. Passe para 1 se quiser seguir para leste. Para subir as esca¬ 
das, vá para 21. 
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Olhando para fora pela janela sul você vê o lado ornamental. 
Pela janela virada a leste você vê campo aberto. Você olha lon¬ 
gamente para o exterior, e depois passa para 42. 
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A sua pontuação é igual a cinco vezes a força que ainda tem, 
mais trinta vezes a quantidade de monstros mortos. Chegou ao 
fim desta aventura. Continue agora a ler o livro. 
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Tentanto ver através do nevoeiro que se levantou desde que 
você começou a explorar o castelo, consegue observar, mais 
abaixo e para sul, o lago ornamental. Esticando o corpo e olhan¬ 


do para a direita através da janela virada a oeste você consegue 
ver a porta de entrada do castelo. Quando estiver farto de olhar, 

passe para 6. 
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Você encontra-se na Câmara de Audiências. As tapeçarias 
gastas que revestem as paredes dão apenas uma pálida ideia do 
antigo esplendor da sala. Existe uma janela virada a oeste. 
Olhando através dela para a direita você vê a entrada do castelo. 
Lance duas moedas. Se ambas derem caras, você encontra dia¬ 
mantes com um valor de $169. Se ambas derem coroas, você de¬ 
verá lutar contra o fanático Engolidor de Carne que subitamente 
penetra na sala, Para lutar com o Engolidor, lance novamente as 
duas moedas: se numa sair caras e noutra coroas você vence-o, 
devendo acrescentar um ao seu inventário de monstros e dupli¬ 
cando a sua força. Se ambas derem o mesmo resultado você per¬ 
de, dividindo a sua força por dois ‘ Para sair para norte passe pa¬ 
ra 40. Para passar pelas portas a sul ou a leste, vá para 6. 
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Você encontra-se no quarto principal, no andar superior do 
castelo. Olhando para baixo através da janela virada a oeste vo¬ 
cê consegue ver a entrada do castelo, e pela janela a norte vê o 
jardim das damas. Existem portas para leste e para sul. Lance 
uma moeda. Sc sair caras, vá para 20. Se não, passe para 16. Pa¬ 
ra sair pela porta sul, vá para 2. Dirija-se para 32 se quiser sair 

pela porta leste, 
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Um lobisomem feroz avança em sua direcção, com os olhos 
brilhando de violência. Lance duas moedas, rapidamente. Se de¬ 
rem o mesmo resultado, você derrotou o lobisomem. Se bem que 
a sua força tenha diminuído de 10 você consegue escapar, pas¬ 
sando para 9. Se as moedas derem resultados diferentes, o lobi¬ 
somem começa a atingi-lo, diminuindo para metade a força que 
lhe resta. Você consegue arrastar-se para longe do monstro, pas¬ 
sando para 9. 


20 
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Ooooh... você está no quarto das criadas. Sente um ligeiro 
odor a perfume, Existe uma saída para oeste e uma porta para 
sul. No entanto a sua atenção é atraída por um ruído abafado 
que parece vir de trás da cama. Temeroso, você rodeia a cama 
mas vê-se atacado por um devastador Dragão do Gelo! Você 
sente o cheiro a enxofre vindo das suas narinas. Lance duas moe¬ 
das. Se não forem duas caras você perde, perdendo 15 unidades 
de força. Se vencer, acrescente 100 à sua força. Para sair por 
norte vá para 18. Passe para 30 se quiser sair pela porta oeste. A 
porta sul conduz a 23. 
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Espreitando para o interior da sala você verifica que foi em 
tempos o quarto do rei. Tudo parece calmo. Ao voltar-se você 
nota um pequeno frasco no solo. Rapidamente, você tira a rolha 
e engole o seu conteúdo. Lance duas moedas, Se não forem am¬ 
bas coroas, o frasco contém um maravilhoso elixir que triplica a 
sua força. No caso contrário o frasco contém apenas água. Vá 
para 2. 
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Você vê-se atacado por uma Horrível Coisa de aspecto parti¬ 
cularmente desagradável. Lance duas moedas. Se saírem duas 
coroas você ganha, e acrescenta 50 à sua força. Se saírem duas 
caras, a sua força diminui para metade porque a Coisa consegue 
derrotá-lo. Passe para 2. 
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Chegou às cozinhas do castelo. Através das janelas existentes 
na parede norte você consegue ver o jardim das damas. Já há 
muitos anos que nào se preparam aqui as refeições do rei e da 
sua corte... Vê um rato correr através da sala. Lance uma moe¬ 
da. Se sair caras, você tropeça fazendo um ruído, e deve passar a 
8 para ver o efeito deste. Para sair pela porta sul vá para 9. 



Você encontra-se numa pequena sala exterior ao castelo pro¬ 
priamente dito. Consegue ver o lago através das janelas a sul. 
Lance uma moeda. Se for caras, passe para 41. Para sair pe a 
porta norte vá para 15. Vá para 23 se quiser sair pela porta oeste. 
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Você morreu! Vá para 27. 

38 


Vá para 14. 


39 


Olhando ao longo das escadas você consegue descobrir uma 
pequena sala em baixo, e mais abaixo ainda apercebe-se da sa a 
do guarda das prisões. De súbito vê surgir na escada o fantasma 
de um antigo carcereiro que lhe exige $100. Se tiver este valor 
consigo pague-lhe e dirija-se em seguida para 2. Se não tiver, o 
fantasma fica enraivecido e ataca-o. Lance uma moeda. Se sai 
caras passe para 37. Se sair coroas, diminua para metade a sua 
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Você encontra-se no átrio de entrada do castelo. Esta muito 
escuro e a aparência de desolação c ruína da sala e deprimente. 
Você sente-se subitamente atemorizado. Para fugir do castelo 
passe para 7. Para continuar através da porta a sul, va para Zú. 
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Uma aranha pica-o na perna. A sua força diminui de 20. Ago- 
ra passe para 36. 

42 


Você encontra-se no vestíbulo das traseiras. Existem nele duas 
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janelas viradas a sul. Para olhar através delas, vá para 13. Para 

sair pela porta a norte, siga para 9. Passe para 38 se quiser sair 
pela porta leste. 

43 

O terrível Desgrenhado ataca-o! Luta consigo selvaticamente, 
como um louco furioso. Lance ao ar duas moedas. Se não saí¬ 
rem duas coroas você ganha o combate, e deve duplicar a força 
que lhe resta. Mas se saírem duas coroas, o Desgrenhado ganha 
o combate e a sua força diminui para metade. Passe para 6. 
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III 


A AVENTURA EM ACÇÃO 


Antes de observarmos em pormenor a nossa primeira listagem 
de aventuras, discuLindo cada elemento do seu desenvolvimento, 
gostaria de mostrar ao leitor alguns «instantâneos» da acção 
produzida pelo programa. 

Em primeiro lugar o programa pede-nos que indiquemos o 
nosso nome, que virá a usar ao longo do jogo: 

QUAL É O SEU NOME, EXPLORADOR? AN- 

DREW 

O computador passa em seguida a dizer-nos — tal como fará 
repetidas vezes ao longo do jogo — qual a situação actual: 

ANDREW, A SUA ENERGIA É 95 

TEM S 75 

ESTÁ DEMASIADO ESCURO PARA VER 

QUE DESEJA FAZER? 1 

A pergunta «Que deseja fazer» será apresentada sistematica¬ 
mente ao jogador. As respostas que a máquina compreende se¬ 
rão explicadas um pouco mais adiante, sob o título «Vocabulá¬ 
rio». Note que aqui o nosso herói, Andrew, escreveu «I», o que 
significa «Inventário», Isto significa que deseja aumentar as 
suas reservas de provisões. 

O computador passa para a subrotina apropriada, indicando 
0 dinheiro de que Àndrew dispõe («Tem $75») e em seguida a lis¬ 
ta de produtos disponíveis e respectivos preços: 
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PROVISÕES & INVENTARIO 
TEM S 75 
VOCÊ PODE 

COMPRAR 1 — ARCHOTE (S15) 

2 — MACHADO ($10) 

3 — ESPADA ($20) 

4 — ALIMENTOS (S2/UNIDA- 

DE) 

5 — AMULETO MÁGICO (S30) 

6 _ ARMADURA ($50) 

0 — CONTINUAR AVENTURA 

NÚMERO DA OPÇÃO? 1 


Andrew escreve «1», dizendo ao computador que deseja com¬ 
prar um «archote» (primeiro elemento da lista apresentada pelo 
computador). O archote é acrescentado às suas posses, sendo a 
sua riqueza diminuída de $15, o custo do archote, e sendo nova¬ 
mente apresentada a mesma lista: 


VOCÊ PODE 
COMPRAR 


1 — ARCHOTE (S15) 

2— MACHADO ($10) 

3 — ESPADA ($20) 

4 — ALIMENTOS (S2/UNIDA- 

DE) 

5 _ amuleto mágico (S30) 

6 — ARMADURA ($50) 

0 _ CONTINUAR AVENTURA 


NÚMERO DA OPÇÃO? 4 
QUANTAS UNIDADES? 20 


Desta vez, Andrew escolheu o quarto elemento da lista, indi¬ 
cando que deseja adquirir alimentos. Estes são obviamente mui¬ 
to importantes. Iniciamos o jogo com uma força limitada, gra¬ 
dualmente consumida à medida que o jogo prossegue. Se chegar 
a zero morremos. Por outro lado, as lutas com os monstros di¬ 




minuem também a nossa força. Comer permite-nos recuperá-la. 
Temos de estar atentos à força de que dispomos ao longo de to¬ 
do o jogo, tentando dispor sempre de alimentos suficientes para 
a recuperarmos. 

Depois de escrever 4, Andrew deve indicar quantas as unida¬ 
des de comida que deseja adquirir, tendo em conta que cada uma 
delas custa $2. Depois de ter sido feita a compra (Andrew adqui¬ 
re vinte unidades), o aventureiro escreve 0, indicando que deseja 
continuar a aventura: 


TEM S 20 


VOCÊ PODE 
COMPRAR 


1 — ARCHOTE ($15) 

2 — MACHADO (SI0) 

3 — ESPADA ($20) 

4 — ALIMENTOS (S2/UNIDA- 

DE) 

5 — AMULETO MÁGICO ($30) 
6— ARMADURA ($50) 

0 — CONTINUAR AVENTURA 


NÚMERO DA OPÇÃO? 0 


É imediatamente apresentado outro relatório da situação, in¬ 
dicando a força e a riqueza de Andrew, e o facto de dispor de 20 
unidades de comida. E descrita a posição em que se encontra, e 
Andrew escreve «E» (significando que deseja mover-se para les¬ 
te) quando lhe é perguntado o que pretende fazer em seguida: 


ANDREW, A SUA ENERGIA E 90 
TEM $ 20 


O SEU SACO DE PROVISÕES CONTÉM 20 UNI¬ 
DADES DE COMIDA 

*%**%%******%***%***%********* 
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ESTA NA ENTRADA DE UM CASTELO 
EM PEDRA 

DE APARÊNCIA TERRÍVEL. ESTÁ VIRADO 
PARA LESTE. 

O aventureiro desloca-se para leste, sendo apresentado um no¬ 
vo relatório da situação. Note que a força è ligeiramente reduzi¬ 
da: 

ANDREW, A SUA ENERGIA É 8S 
TEM S 20 

O SEU SACO DE PROVISÕES CONTÊM 20 UNI¬ 
DADES DE COMIDA 


ESTÂ NO ÁTRIO 

EXISTE UMA PORTA PARA SUL 

ATRAVÉS DAS JANELAS A NORTE CONSEGUE VER O 

JARDIM DAS DAMAS 

EXISTEM AQUI RIQUEZAS NO VALOR DE S 100 
QUE DESEJA FAZER? G 

Andrew resolve «guardar» o dinheiro que encontra, e portan¬ 
to escreve «G». O facto é indicado no novo relatório apresenta¬ 
do pela máquina: 

ANDREW, A SUA ENERGIA É 80 
TEM $ 120 

O SEU SACO DE PROVISÕES CONTÉM 20 UNIDADES 
DE COMIDA 

*********+*****+******+*+***** 


ESTÁ NO ÁTRIO 

EXISTE UMA PORTA PARA SUL 

ATRAVÉS DAS JANELAS A NORTE CONSEGUE VER O 

JARDIM DAS DAMAS 
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QUE DESEJA FAZER? S 

Deslocando-se para sul (Andrew escreveu «S»), o aventureiro 
entra na Câmara de Audiências. Mas não está só! Faltam poucos 
momentos para o seu primeiro combate: 

ESTÁ NA CÂMARA DE AUDIÊNCIAS 
EXISTE UMA JANELA A OESTE. OLHANDO PARA A 
DIREITA ATRAVÉS DELA CONSEGUE VER A ENTRA¬ 
DA DO CASTELO. 

EXISTEM PORTAS PARA NORTE, LESTE E SUL. 
PERIGO! EXISTE AQUI UM MONSTRO... 

UM DEVASTADOR DRAGÃO DO GELO! 

O NÍVEL DE PERIGO Ê 20!! 

QUE DESEJA FAZER? L 

Andrew escreveu “L”, isto é, “Lutar”. Poderia ter escrito 
“F” (fugir) se não tivesse coragem. Mas talvez o computador 
não tivesse aceite isto, respondendo-lhe “Não, és obrigado a 
combater”. Mas Andrew não qüís tentar fugir. 

+~”* — * ~* — + * * + * + + * — + 

* _ +~ * — * — — 

+“ *■” V % * * + * _ * 

Jt ~ * * * * * + ♦ _ * — * — * "~+ 

_ * ♦ ♦ _ + __ t ~* 

NÃO POSSUI ARMAS 
DEVE LUTAR DE MÃOS NUAS 

VOCÊ ATACA 

CONSEGUE FERI-LO 
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O MONSTRO ATINGE-O! 

VOCÊ ATACA 

CONSEGUE FERI-LO 

O MONSTRO ATINGE-O! 

VOCÊ ATACA 

E CONSEGUE MATAR O DEVASTADOR 
DRAGÃO DO GELO! 

Andrew sente a sua força muito diminuída, e 
portanto decide comer; escreve portanto “C”: 

ANDREW, A SUA FORÇA É 6S 

TEM S 120 

O SEU SACO DE PROVISÕES CONTÉM 
20 UNIDADES DE COMIDA 

QUE DESEJA FAZER? C 

TEM 20 UNIDADES DE COMIDA 
QUANTAS QUER INGERIR? 15 

ANDREW, A SUA FORÇA É 125 
TEM S 120 

O SEU SACO DE PROVISÕES CONTÉM 
5 UNIDADES DE COMIDA 

E a aventura prossegue; 

ESTA SALA FOI USADA COMO SALA 
DO TESOU RO HÁ MUITOS ANOS... 

NÃO EXISTEM JANELAS, APENAS 
SAÍDAS PARA NORTE E LESTE 
EXISTEM AQUI RIQUEZAS NO VALOR 
DES 159 

QUE DESEJA FAZER? G 
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ANDREW, A SUA FORÇA É 120 
TEM $ 279 

O SEU SACO DE PREVISÕES CONTÉM 5 
UNIDADES DE COMIDA 

****************************** 

NÃO EXISTEM JANELAS, APENAS 
SAÍDAS PARA NORTE E LESTE 

QUE DESEJA FAZER? E 

+ ** + + + + + + + + +* + *★*★** + ** + ** + *+ + 

ANDREW, A SUA FORÇA É 115 
TEM S 279 

O SEU SACO DE PROVISÕES CONTÉM 
5 UNIDADES DE COMIDA 

****************************** 

ESTÁ NUMA PEQUENA SALA FORA DO CASTELO 

EXISTE UM ELEVADOR NO QUAL SE PODE ENTRAR 

POR UMA PORTA A NORTE 

OUTRA PORTA CONDUZ A OESTE 

PODE VER O LAGO ATRAVÉS DAS JANELAS 

VIRADAS A SUL 

QUE DESEJA FAZER? N 

ENTROU NO ELEVADOR... 

COMEÇA A DESCER LENTAMENTE... 

****************************** 

ESTÁ NO VESTÍBULO DAS TRASEIRAS 
EXISTEM JANELAS A SUL, DAS QUAIS 
SE CONSEGUE VER O LAGO ORNAMENTAL 
EXISTE UMA SAÍDA A LESTE, 

E OUTRA PARA NORTE 

QUE DESEJA FAZER? 
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IV 


CRIAÇÃO DA PLANTA 


Começaremos agora a escrever o programa de aventuras — 
“Os Lobisomens e o Aventureiro*’ — passo a passo. Se o leitor 
seguir cuidadosamente esta explicação e for introduzindo no 
computador as linhas dc código à medida que forem apresenta¬ 
das, conseguirá compreender facilmente o modo de escrever es¬ 
tes programas. 

Os conceitos usados neste primeiro programa, relativamente 
simples, podem depois ser aplicados por si ao criar os seus pró¬ 
prios programas de aventuras. 

Primeiramente vamos desenvolver uma versão razoavelmente 
simples de “Os Lobisomens e O Aventureiro”; depois elaborare¬ 
mos esta estrutura, criando um programa de aventuras um pou¬ 
co menos previsível (e portanto mais interessante). Descobrirá 
ao longo deste desenvolvimento algumas ideias-chave que pode¬ 
rá usar depois nos seus programas. 

Em seguida transformaremos o nosso programa original “Os 
Lobisomens e o Aventureiro” num programa compietamente di¬ 
ferente, O DESASTRE ASIMOVIANO. A primeira aventura 
realiza-se num castelo abandonado. O “Desastre Asimoviano” 
realiza-se no espaço exterior, onde você (o intrépido explorador 
dos espaços) encontra os destroços da gigantesca nave de trans¬ 
porte, a Isaac Asimov. Você é apanhado entre os destroços, e ao 
mesmo tempo que evita androides enlouquecidos e alienígenos 
francamente inamistosos, deve tentar alcançar a área de lança¬ 
mento para fugir no último transporte salva-vidas. 

Mas tudo isto se encontra ainda no futuro... Comecemos ago¬ 
ra a explorar a construção do nosso programa de aventuras, OS 
LOBISOMENS E O AVENTUREIRO. 
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Construção da planta 

Como indicámos anteriormente, um ambiente de Aventuras 
deve ser coerente. Isto è, o explorador que o percorre deve ser 
capaz de construir um mapa completo dele à medida que o per¬ 
corre. Se representa uma porta ligando o estúdio a biblioteca no 
primeiro andar de uma casa, porque descobriu que ao passar pe¬ 
la porta do estádio ia dar à biblioteca, deve poder voltar atras e 
atingir de novo o estúdio pela mesma porta. Deve deste modo 
conseguir construir uma planta completa, consultando-a quando 
necessário ao mover-se dentro da casa, castelo, floresta, labirin¬ 
to subterrâneo ou qualquer outro local onde se realize a avenlu- 

O primeiro passo consiste, portanto, ao desenvolver um pro¬ 
grama de aventuras, em construir um ambiente que possa ser re¬ 
presentado em mapa, e também de algum modo que o computa- 

dor o possa conter. , „ , 

É agradável saber que não é difícil satisfazer ambas estas con- 

Observe o seguinte ambiente de cinco salas, de resto bastante 
simples (figura 1). 


0—+—E 
S 


SALA 3 


SALA 1 


SALA 4 


SALA 2 


SALA 5 


Fig- 1 
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A chave para a construção de um ambiente como este, de um 
modo que o computador consiga compreender e processar, con¬ 
siste em definir um quadro ou matriz cujos elementos represen¬ 
tam as salas. Os traços mais grossos entre as salas indicam por¬ 
tas. 

Se você se encontrar na sala 1, pode deslocar-se para leste (sala 
3) ou para sul (sala 2). Na sala quatro pode deslocar-se para nor¬ 
te, entrando na sala três, ou para sul (sala cinco). Imagine que 
você constrói um quadro dimensionado da seguinte forma: DIM 
A(5,4). A primeira dimensão é a sala, e a segunda são as quatro 
direcções possíveis (isto é, norte, sul, leste e oeste). 

Construção da tabela de movimentos 

Armados com o mapa destas cinco salas, podemos agora 
construir uma Tabela de Movimentos que depois será introduzi¬ 
da na matriz e indicará o modo como executaremos os nossos 
movimentos. 

Vejamos então a tabela correspondente ao ambiente muito 
simples que estamos a considerar: 

SALA N S E O 

1 0 2 3 0 

2 10 5 0 

3 0 4 0 1 

4 3 5 0 0 

5 4 0 0 2 

Estude calmamente esta tabela e a relação entre ela e a planta 
que apresentámos anteriormente; este aspecto é de facto o mais 
importante na construção de programas de aventuras. 

Observe os valores da tabela para a sala um. Sob o título “N M 
(que indica Norte) vemos um zero, o que significa que não pode¬ 
mos mover-nos para norte a partir dessa sala (o que é fácil verifi¬ 
car observando o mapa. No entanto, sob o S encontramos o nú¬ 
mero dois significando que no caso de nos deslocarmos para sul 
a partir da sala 1 entraremos na sala 2 (o que pode novamente ser 
verificado no mapa). Se nos movermos para leste (coluna “E” 
da tabela, evidentemente) entraremos na sala 3. O algarismo ze- 
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ro na coluna “O” significa que não è possível mover-nos nessa 


dÍ Se C íuiser pode continuar a estudar a tabela, verificandoseto- 
dos os númcros nela representados correspondem de facto a 


planta de que partimos. rfP o locar . n0 s agora pelo ambien- 

^ ■ p”* a « d ° 

„õ,. T^S»t'5. mi 1“ ° 


Movimentos 


Em primeiro 'uear dcvemo^e^rever 
KSs ctdos READ/DATA como os que são apresentados 
em seguida; 


10 

20 

30 

40 

n 0 

70 

30 

90 
■1 00 

110 


D h v 

c f=, — 

i v - — 

FOR C = i 
RERD .fl í 

MEXT C 

NÊXT 6 
ORTh 0; 
DRTR 1í 
D flTR 0; 
DRTR 3j 
DRTR 4-. 


n 5 

0 4 


R í B ; C ■* 

C 

B ^ . _ 
0 , 2 , ; 0 
1 í 0 ; 5 J 0 

0 ; 4- I 0 ; 1 
3 , 5,0 ; 0 

4,0,0 j 2 
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Como pode verificar, as instruções DATA correspondem 

exactamente aos elementos da tabela ‘J®. 

O quadro adquirirá portanto os seguint 


A(l.l) 
A( 1,2) 
A(l,3) 
A( 1,4) 


0 


A(2,l) = 1 
A(2,2) = 0 
A(2,3) - 5 
A(2,4) - 0 

A(3,1) = 0 
A(3,2) - 4 
A(3,3) = 0 
A(3,4) = 1 

A(4,l) - 3 
A(4,2) - 5 
A(4,3) = 0 
A(4,4) - 0 

A{5,1) - 4 
A(5,2) = 0 
A(5,3) = 0 
A(5,4) = 2 


Observando estes valores, compreendemos que o primeiro nú¬ 
mero existente a seguir a A é o número da sala, e que o segundo é 
a saia para onde o jogador passa se se mover na direcção em cau¬ 
sa (tendo em conta que a primeira direcção é norte, a segunda 
sul, a terceira leste e a quarta, obviamente, oeste). Tudo isto era 
já sugerido pela nossa tabela de movimentos. Espero que o leitor 
já tenha começado a compreender a importância da tabela de 
movimentos para a construção e processamento de um ambiente 
artificial. 

A posição do jogador 

Se decidirmos que a sala onde o jogador se encontra pode ser 
designada pela variável SA (como acontecerá de facto tanto em 
,l Os Lobisomens e o Aventureiro*’ como em “O Desastre Asi- 
moviano”), poderemos dizer ao jogador onde se encontra e as 
saídas possíveis utilizando o seguinte método: 
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130 Ir H í 5 Pi , 3 ‘ O0 THfctJ PK_ri’ 

ODE SP IP rÜP tSTE. ,J _- Tfcn 

li® Ir flíSfl^í O0 TritW PR INI 


PLP N 


"i l 


XIS 


11 1 ™ " * T ^ . -F— | J 

UHR PO PTH fl 0E'Oi£' 


A resposta do jogador pode ser uma única letra (por exemplo 
“N’\ indicando norte); o computador espera por essa resposta, 

e verifica se existe saida na direcçào indicada: 


150 INPUT 


J:nl 


3UE DE3EJR fPZEP/ 


Dt 


150 IP D5 = ;i í-r RND.RíSRii^ 5 ? THc 

rtn Tf-.iT r 1 M Ci H i-‘nnr HOU£.K — C '1 - n 


1 ! 


N PRINT "NflO r 0D H MOUtK-it Hi-OOn 

DIRECCRO" __ ,. T- Mfr 

170 IF D8="S” AND fl (SH ,a.|.=0 > Ht 

N PRIMT "NflO PODE PhssRR 

DRS fhP.EC-ES' 1 _ .. -^ = 

ISO IF Dí = “E M AND FIíSH;-.V! =0 TH^ 

N PRINT ”E' McLNOR TcNTRR NOUThH 

DTRFCOp0 ,J ^ 

190 IP D 5 ='' 0 ;; RND R Í5fi j 4-J =0 * 

H^PRINT 1 NHG tXISTc ísnMHUHB FÜkT 

R PRRfl 0E5TE W 

Como o leitor poderá verificar rapidamente, usaremos este 

sistema nos nossos programas de aventuras. 

O leitor jà sabe portanto como o quadro, construído ai partir 

da tabela de movimentos, nos indica se o jogador pode 
mover-se na direcçào pretendida. Mas quanto ao movimento 

propriamente dito? 

Movimentos no cenário 

As verificações do tipo “nào podes mover-te nessa direcção”, 
nas linhas 160 a 190, podem provocar uma repetição da P er S“« ta 
inicial “Oue oueres fazer?” até * ■ J. _ __ 


AS uvj upv - 

nas Unhas 160 a 190, podem provocar uma repetição da pergunta 
inicial “Oue queres fazer?” até ser dada uma resposta và 1 a. 
Hm seguida realizar-se-á o movimento (note a proposito que os 


números das salas nunca são referendados explicilamente, ser¬ 
vindo apenas para uso interno do computador; o jogador apenas 
conhece os nomes das salas — VOCÊ ESTÁ NA CAMARA DE 
AUDIÊNCIAS — e, em muitos casos, o conteúdo da sala e as 


possíveis saídas). 

Se o jogador indicasse “N” (de “norte”) ao encontrar-se na 
sala 4 (verifique na planta o que isto significa), o computador 
poderia continuar do modo seguinte. Em primeiro lugar, a va¬ 
riável SA seria igualada a 4. Uma curta rotina poderia converter 
o “N” no número 1 (indicando o primeiro elemento do quadro), 
de modo a permitir ao computador saber que o jogador vai en¬ 
trar na sala número A(SA,1). Como SA c igual a 4, A(4,l) dá 3. 
Isto significa que o jogador pode mover-se para a sala número 3 
(que, como podemos verificar rapidamente na planta, se encon¬ 
tra de facto a norte da sala 4). A variável SA seria passada ao va¬ 
lor três, pelo que a máquina poderia imprimir “Está na sala 3”. 
Seria possível indicar em seguida uma nova escolha de direcção, 
e o jogador continuaria a mover-se pelo cenário. 


Coerência e realidade 

Se bem que as salas apenas existem no papel e nos elementos 
de uma matriz, o facto de se comportarem como salas verdadei¬ 
ras permite dentro em pouco incutir no jogador a ideia de que 
existem realmente. Acrescente descrições das salas — “Está nu¬ 
ma pequena sala de arrecadação junto às traseiras do edifício 
principal, com uma pilha de sacos no canto mais afastado e um 
machado pendurado por cima da janela. Sobre uma mesa está 
um pedaço de pâo, e ao lado uma nota escrita. Existem portas 
viradas a norte e a oeste”. O ambiente acaba por adquirir di¬ 
mensões bastante sólidas na nossa mente. 

Quando o mapa se torna mais complexo, como acontece em 
“Os Lobisomens e o Aventureiro”, e muito mais ainda em “O 
Desastre Asimoviano”, as descrições ajudam a clarificar as ima¬ 
gens mentais das salas e a dar-nos uma ideia “realista” com bas¬ 
tante influência nos jogadores. 

Talvez o leitor queira tentar escrever um programa simples, 
antes de continuar, que lhe permita deslocar-se no ambiente de 
cinco salas que acabámos de estudar. 
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V 


CRIAÇÃO DA ESTRUTURA 


Passaremos agora deste ambiente simples, com apenas cinco 
salas, para o cenário muito mais complexo (com um total de 19 
salas) do castelo que teremos de visitar na aventura “Os Lobiso¬ 
mens e o Aventureiro”. 

Ciclo principal 

Este programa de aventuras é estruturado de acordo com um 
esquema bem definido, concebido muito antes de ter sido dese¬ 
nhada a planta do castelo ou terem sido concebidos quaisquer 
dos incidemes que ocorrerão durante o jogo propriamente dito. 
Trabalhar com um esquema deste tipo, no qual as acções a reali¬ 
zar pelo programa são definidas antes de se ter em conta a forma 
concreta de o codificar, é designado muitas vezes por programa¬ 
ção “estruturada”. Vejamos qual é o esquema inicial de “Os 
Lobisomens e o Aventureiro”, tal como se apresentava antes de 
o programa ser de facto escrito; 

1NIC1AL1ZAR 

ROTINA PRINCIPAL 

INFORMAR O JOGADOR DO CONTEÚDO DA 
SALA E DO SEU PRÓPRIO ESTADO 
RECOLHER TESOUROS 
COMBATER OS MONSTROS 
COMER 

COMPRAR PROVISÕES 

SE O JOGADOR AINDA ESTÁ VIVO E NÃO SAIU, 

VOLTAR À ROTINA PRINCIPAL 
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CUMPRIMENTAR O JOGADOR, OU LASTIMA-LO 
FIM 

O programa consiste apenas nisto, inicialmente. Mas acaba 
por se transformar no que se segue (note, porém, que o esboço 
inicial controla a estrutura final do programa): 

IDENTIFICAR (Linha 10) 

IR PARA ROTINA DE INICIALIZAÇÃO (20) 

IR PARA ROTINA PRINCIPAL (30) 

SE O JOGADOR NÃO MORREU NEM ATINGIU A SAÍDA, 
VOLTAR À LINHA ANTERIOR QUE ENVIA PARA A RO¬ 
TINA PRINCIPAL (40) 

MENSAGEM DE CUMPRIMENTOS (70 a 140) 

ROTINA PRINCIPAL (160 a 320) 

SE HOUVER LUZ, DESCREVER SALA (330) 

VERIFICAR EXISTÊNCIA DE MONSTROS/TESOUROS, 
DESCREVER (360-440) 

PERGUNTAR ATITUDE DO JOGADOR (450-710) 

SUBROTINA DE COMBATE (720-970) 

SUBROTINAS DE DESCRIÇÃO DE SALAS (990-2280) 

MENSAGEM DE MORTE (2300-2330) 

ROTINA DE RECOLHA DE TESOUROS (2350-2400) 

DIZER A JOGADOR COBARDE QUE DEVE LUTAR (2420- 
-2460) 
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COMER, AUMENTAR FORÇA (2480-2580) 


INICIALIZAR (2600-2990) 

ATRIBUIR VARIÁVEIS 

nppfv^ m^ R v MATRIZ DAS SALAS 
DEFINIR NOME DO JOGADOR 

DISTRIBUIR TESOUROS POR SALAS 

distribuir monstros por salas 


ROTINA INVENTÁRIO/PROVISÕES (3010-32901 

pode ajudar bastante a dar forma a um programa que de outro 
modo facilmente ficaria fora do nosso controlo. 

O programa baseia-se num ciclo principal que chama todas as 
subrotmas necessárias, verificando em seguida se o jogo termi¬ 
nou (por o jogador ter atingido a saída, ou se encontrar morto) 

Mvo è a n V /n n , flCaÇ5 ° f ° r nS f' ÍVa (ÍSt0 é - se 0 J^dor ainda es Ner 
Mvo t não tiver encontrado a saída), o programa volta ao início. 

te ciclo continua até uma das verificações de final de ioco ter 
dado resultado positivo. J g ter 

k 

. / 

Construção modular 

O programa foi escrito numa série de módulos discretos um 
processo que aconselho o leitor a seguir. Ajudá-lo-á a manter 
ob controlo um programa comprido e complexo enquanto um 

,rabaIho menos disciplinado tornaria a tarefa impôs- 

muito mais fácil de modificar (como poderá veS quando ™ 
üreho”J S eip mla mais D elaborada de “Os Lobisomens eo Aven- 

ureiro ) e de corrigir. Para tornar mais fácil descobrir a função 
e ca a parle, estas poderão ser divididas por declarações REM 

nSo,«í;S CO> ' P T" in< !f ““ i"Sí. “ 

oüujos separados quando sc observa a listagem. 

O programa imeia-se portanto pelas quatro linhas seguintes: 
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10 REM 

n* LOBISOMENS £ 

£0 GO SUB £500: 


0 RUENTUREIRp 
REM # I N I L I ^ i— ^ ^ 


RR* „ , 

30 GO SUB 1^0 . 

40 IF SROÜ THEN 


GO TO 30 


qa fnr ieual alio jogo termina, dado que a sala 1 lê a sai- 
Se SA ror «“JJ L de ver a linha 20 chama a subrotma 

da do castelo. ^«10 : st0 é a subrotina dc inicialização. A 

ffha” o“ àtoSíacLpil. . <e . v.rifaçao <ht Unha « 

é negativa, volta a 30 para chamar novamente esta rotina. 
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VI 


DESENVOLVIMENTO DO CENÁRIO 


Como já vimos no final do último capitulo, a linha 20 envia a 
execução para a subrotina de inicialização que começa na linha 

2600. Vejamos: 


>REM 

2530 REM 


2570 

2630 

2700 

2710 

2720 

2730 

274-0 


REM 

RtM 

CIM 

FOR 

FOR 


X X X * X *.X XXXXXXÍ-XXXXX 

1 P 1 ■ it ■■ ■ h IP- I ¥ ■■ I ■ ■ ■ lh ■ ■ ■ ■ ■ ■ ■ ■> I* ■■ PI 

*INICIflLIZ hR* 

■ 1 L # ■■ M pp Ari- i k 1 H * n • r I ■■ d 1 J J H H j ■ 1 ■ ■ r ■■ 

*DEFINIR CASTELO* 

At 13,7) 

3=1 TO 1^ 

Cal TO 7~ 


R E A D H •. E? ; L" - 1 

NEXT C 
NEXT B 



São estas as linhas que preenchem a matriz com os números 
que representam as direcções a usar pelo jogador. 

O sétimo elemento de cada sala é usado para guardar tesouros 
ou monstros, como se explicará no capítulo seguinte. 

Neste jogo existem seis direcções possíveis: os quatro pontos 
cardeais, para cima e para baixo. O castelo possui três andares e 
podemos passar de um para outro através de uma escada circular 
e um antigo ‘"elevador hidráulico”. Os números que se seguem 
às declarações DATA (linhas 3310 a 3490) representam, para ca¬ 
da sala: norte, sul, leste, oeste, para cima e para baixo. Vejamo- 
-los: 


3300 REM 

^ w m “ » 1 ■ ^ 1 1 iN .■ L - - ■■ ■■ ■■ d«- + + * ■ n .i ■ h ■ ■■ ■ * ■ ■ * ■ * * * * 

3310 DATA 0 2,0,3,0 ; 0,0 : REM 
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0 t 0 y 0 ; REM 5RÍ 


3330 DRT h 2,0 
R 3 

334-0 D rí! R 0j&'« OjOjO/O/0: REM -^RL 
R 4- 

3350 DRTR 4- 1 0 ; 0,3 , 15, 13 ,0 : REM S 
RLR 5 


3 350 

DRTh 

0 

, 0 


jl 

; 

0; 

*-■ ; 

0 ; 

0: 

REM 5 

RL 

R 5 













33 70 

ij hTh 

0 

; 5 


0 

■ 

0 / 

0; 

0 i 

0: 

REM 5 

RL 

R 7 













3 3 30 

D RT R 

■ 

'T 

> -L 

0 

í 

0 

/ 0 

/ 0 

; 0 

i0 

: REM 

SR 

LR 3 













3390 

DRTR 

0 

A 

) -L 

9 


0 

,3 

/ 0 

. 3 

,0 

: REM 

SR 

LR 9 




■ 









34-00 

Dh R 

u* 


; 

■T 

1 

; 0 

; 0 

i0 

,0 

REM 

SR 

Lfi 10 












34-10 

DRTR 

0 

rs 

} 

10 

;0 

,0 

/ 0 

;0 

: REM 

SR 

LR 1 













34-20 

DRTR 

0 

J 0 


0 

J 

13 

,0 

;0 

10 

: REM 

SR 

LR 1; 

r ^ 












34-30 

l>rt r 

0 

0 

- 

1 


/ 0 

/ 5 

; 0 

/ 0 

KEm 

SR 

LR 1 













34-4-0 

DRTR 

0 

T 

) X 

I 

; 

-T 

7 ; 

0; 

0; 

0, 

0: REM 

■ 

w í 

RLR 

14- 












34-50 

DRTR 

14-; 

0 

; 


/ 0 

/ 0 

i ^ 

; 0 

: REM 

SR 

LR 1 













34-50 

L'-’ H T R 

■1 

7 i 

0 

/ 

X 

9 ; 

0; 

0; 

0 ; 

0: REM 


RLR 

IS 












34-70 

DRTR 

-T 

5 ; 

1 

5 

; 

0; 

14- 

; 0 

j 0 

, 0: RE 

M 

'oRlR 

17 









■ 



34-80 

DRTR 


; 1 

7 

; 

0 

; 0 

; 0 

; 0 

; 0 

: REM 

SR 

LR i 

5 




j 









DRTR 

9 

,0 


1 

0 

f 0 

; 0 

i0 

,0 

: REM 

SR 


i-R 19 

Convém verificar agora qual a relação entre estes dados e a 
planta do castelo. É óbvio que quando se entrega este jogo a al¬ 
guém não se fornece simultaneamente uma planta. Parte do pra¬ 
zer dos jogos de aventuras reside precisamente em construir um 
mapa do ambiente» necessário para nos podermos mover. Pas¬ 
sear pelo cenário, depois de construído o mapa e apenas para o 
verificar, é também divertido. Apenas damos aqui o mapa para 
ajudar o leitor a compreender melhor o programa. 

Existem, como já disse» três andares. O inferior è formado pe¬ 
la sala do carcereiro e uma prisão, como se observa na figura 2. 
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o andar térreo, onde iniciamos a aventura, terá a distribuição 
de salas indicada na figura 3. ’ uismouição 


13. SALA DO 

CARCEREIRO 


Fig. 2 


ESCA¬ 

DA 


MASMORRA 


O andar superior terá a planta da figura 4. 


6, ENTRADA 



2, CÂMARA 
DE AUDIÊNCIAS 


7, COZINHA 


4, SALA 
DO 

CONSELHO 



ESPENS 



5, ÁTRIO 
INTE¬ 
RIOR 


9, ELE¬ 
VADOR 


3, SALÃO GRANDE 


10, VESTÍBULO SAÍDA 


ESCA TRASEIRO 

daI 


11 


Fig. 3 
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18, CÂMARA 
DE VESTIR 

14, QUARTO L- 

PRINCIPAL I i7, QUARTO 


DAS CRIADAS 



Fig. 4 


O leitor verifica facilmente que é impossível ir dircctamente da 
entrada (“sala” 6); a entrada deve possuir também um numero 
de sala! tal como a saida) para a saida (“sala” 1U sem passar pe- 
fas escadas. Não existe qualquer trajecto directo do lado oeste do 
castelo para o lado leste. Isto garante que o jogador seja forçado 
a fazer uma exploração relativamente extensa antes de conseguir 
focaliza! a saida. É também útil confundir um pouco o mapa 
Construir um mapa dos três níveis do castelo pode levar muitas 

horas, como poderá verificar dentro em pouco. 




VII 


TESOUROS E MONSTROS 


Agora que criámos uma secção do programa capaz de tratar o 
ambiente físico do castelo de uma forma que possa ser manipu¬ 
lada, necessitamos de preencher algumas das salas de tal modo 
que o jogador encontre tesouros e monstros com quem comba¬ 
ter. 

É fácil fazê-lo. Vejamos primeiro como vamos distribuir os te¬ 
souros, Será esta a porção de códigos necessários: 


2330 REM 
234-0 REh 
2350 POR 
2350 LtT 
2370 IP 
THEN GO 


n + 4 • ■ » i k ■ * n * 1 ■ A A 1 ■ 1 t ■- ■■ 

SDI3TRIBUIR TE 
Jsl TO 4- 
M = I MT !RND *19Í 
M=6 OR H=li OR 
TO 2360 




4 ■* ' ■ 11 1 


SOURÜ-t 


R (ti 


"í V 
f 



2330 LET fl(M, 7 )=INT iRND* 100 ) +10 
2390 MEXT J 


A Unha 2870 escolhe um número dc sala entre 1 e 19, verifica 
se não é 6 (a entrada, fora do castelo ou 11 a saída, também exte¬ 
rior) e depois se a sala se encontra vazia. O leitor recorda-se cer¬ 
tamente de que mencionámos no capitulo anterior que o sétimo 
elemento de cada sala era deixado em zero para indicar o conteú¬ 
do desta. Agora estamos a preenchê-lo. Se este elemento for ze¬ 
ro, a sala encontra-se vazia. 

Depois de ter sido escolhida uma sala na linha 2870, a linha 
2Ü80 coloca nela uma quantia entre S10 e $109. 

Estando os tesouros distribuídos, é chegado o momento de 
distribuir os monstros. È isso que é feito pela rotina seguinte, 
que escolhe uma sala de modo semelhante ao anterior, mas torna 
em seguida o sétimo elemento igual a um número negativo (-1 a 

4): 
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2900>REM ******************** 
910 REM *DI5TRIBUIR MONSTROS 

2920 POR J = 1 TO 4- 
2*30 LET M=INT (RND*13)+1 
294-0 IF M=6 ÜR M =11 OR RíM,7) 
THEN GO TO 2930 

RÍM t 7) =-ü 
;950 NEXT j 


* 





É fácil verificar que quando o computador observa o sétimo 
elemento de uma sala é capaz de determinar se esta se encontra 
vazia (elemento igual a zero), contém tesouros (superior a nove) 
ou um monstro (menos do que I), imprimindo uma mensagem 
apropriada. O uso da matriz do modo indicado sublinha a gran¬ 
de importância que esta tem para a construção e comando de um 
ambiente de aventuras. 

Finalmente, colocamos tesouros em duas salas (a Sala do Con¬ 
selho Privado e a Sala do Tesouro) independentemente de as ro¬ 
tinas anteriores já terem ou não colocado alguma coisa nelas. As 
linhas que se seguem limpam o que já lá lenha sido posto: 


í 

q Q 3 0 
0 ) 

990 


T Hí 4-, 
T R £ 15 


k: 


K E ! ‘J K 


) =100 + INT (RND * 100 
7)=100+1NT íRND*10 


A linha de retorno é simplesmente usada para terminar a su- 
brotina de inicialização. 

Incorporar variáveis 

São necessárias diversas variáveis para tornar mais realista o 
ambiente da nossa aventura. Prefiro utilizar nomes de variáveis 
sxplicitos, que me permitem recordar imediatamente a que se re¬ 
ferem. Muitos sistemas de computadores apenas reconhecem as 
primeira? 1 duas letras de um nome de variável, pelo que procurei 
neste programa (e nos outros apresentados no livro) não usar no¬ 
mes da variáveis diferentes com as primeiras duas letras iguais. O 
lüitcir poderá poupar tempo e memória escrevendo apenas as 
dum Dtlfcnciras letras do nome de qualquer variável; conseguirá 



mesmo assim ter uma ideia praticamente imediata do significado 
de cada variável. 

A primeira linha da secção seguinte limpa o visor, antes de ini- 
cializar algumas variáveis: 

FORÇA, RIQUEZA, COMIDA, RELATÓRIO, MM 

Se a FORÇA chegar a zero, o jogo termina. As RIQUEZAS 
podem ser utilizadas para comprar COMIDA, usada depois para 
restaurar a FORÇA. O RELATÓRIO indica simplesmente a 
nossa sobrevivência ao ambiente (c acrescentado automatica 
mente «um» a esta variável de cada vez que nos movemos) e MM 
conta os monstros mortos. As linhas que se seguem inicializam 
as variáveis que acabámos de apresentar: 









IR =100 

7 " fl ^ "7 Ti 





A aventura é melhorada se o computador utilizar o nome do 
jogador de vez em quando, pelo que a linha 2750 pede este nome 
e atribui-o à variável de cadeia N$ (de «Nome»), A linha 2760 
limpa o visor depois de feita a pergunta e dada a resposta, prepa¬ 
rando o início do jogo. 

Este começa no exterior do castelo, naquilo que designámos já 
por «sala» 6; a variável SA (de SAla) è portanto igualada a 6 na 
linha 2770. 

Existem algumas coisas que o jogador pode manipular ou usar 
durante o jogo, e nas linhas 2780 a 2820 são igualadas a zero to¬ 
das as variáveis que lhes correspondem. Se qualquer destas va¬ 
riáveis for mais tarde passada ao valor um, este facto significará 
que o jogador transporta consigo ou está a usar o objecto em 
causa. Torna-se assim extremamente fácil comprar, por exem¬ 
plo, um machado. Se a variável MACHADO for igual a zero, o 
jogador não possui nenhum machado. Se MACHADO for no 
entanto igual a um, o computador poderá imprimir «ESTA A 
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TRANSPORTAR UM MACHADO». Se o jogador deixar cair 
ao solo o machado, por exemplo durante um combate (como po¬ 
de acontecer na nossa segunda versão de “Os Lobisomens e o 
Aventureiro”, mais elaborada do que a que estamos a desenvol¬ 
ver), o facto pode ser representado passando simplesmente esta 
variável para o valor zero. 

Vejamos então a parte do código Basic que pede e aceita o no¬ 
me do jogador, define o valor inicial da variável SAla, e atribui 
em seguida o valor zero às variáveis correspondentes a objectos: 


d 7 0 / X H UT U A L- E 0 o E U N U M d-; 
EXPLORADOR? ,f j M$ 

2760 CL6 

2770 LET 5A=5: REM *PÜ'5ICAÜ INIC¬ 
IAL ( 5P. =H , DA SALA)* 

2760 LET ESPADA=0 
2790 LET AMULETO=0 
2300 i_ET MACHADO =0 

2310 LET FATO =0 

■2-^20 LET L'JZ=0 


VI11 


ROTINA PRINCIPAL 


E chegado o momento de investigar a secção do programa que 
está no coraçào de toda a aventura, ou seja, a Rotina Principal. 

Um curto atraso 

Antes de a estudarmos, no entanto, quero mostrar ao leitor 
uma secção muito curta do programa, consistindo de lacto ape¬ 
nas numa linha, mas que é muito importante para a definição do 
ritmo deste. 

Ao contrário do que acontece em muitos programas de aven¬ 
turas que permitem usar um vasto vocabulário, e verificam duas 
ou mais palavras de cada vez, o nosso “Os Lobisomens e o 
Aventureiro” apenas trata um vocabulário muito limitado. De¬ 
vido a isto, reage muito rapidamente ás instruções do jogador. 
Em muitos casos a rcacçào é tão rápida que nem sequer há tem¬ 
po para ler o que se encontra no visor antes de passar à imagem 
seguinte. 

Nestas condições, è incluído no programa um ciclo de espera, 
na linha 3520. Este ciclo vai de 1 a 900, o que me parece ideal pa¬ 
ra o sistema em que o programa foi desenvolvido. No entanto, 
talvez o leitor prefira aumentar ou diminuir o atraso. 

Vejamos este ciclo: 


6600 RtM 
■3510 REM 
GOSTO* 


'* H ■ * #T * ■ -F ¥ V A M Ti ■ * lí F *■ -II M 

*AJUSTE O ATRASO 


3520 rüR T = 1 i 0 900: NEXT 
3530 RtTURN 
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Verificará que esta rotina c chamada repetidamente ao longo 
do programa, não apenas para permitir ao jogador ler as intor- 
mações no visor como ainda para ritmar os acontecimentos (por 
exemplo os combates com monstros, ou a descida do elevador). 

A força diminui 

O jogo termina se perdemos toda a nossa força, como disse¬ 
mos anteriormente* Nestas condições, teremos de estar atentos à 
força de que dispomos, e que vai diminuindo ao longo do jogo. 
Recuperamos força comendo, e a comida pode ser adquirida 
com as riquezas que encontramos no castelo. 

Vejamos então a primeira parte da Rotina Principal, que sub¬ 
trai cinco à nossa força (variável FORÇA) de cada vez que nos 
movemos: 
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Como pode verificar, a linha 180 recorda ao jogador a força 
que possui no caso de esta ser inferior a 10. Veremos mais adian¬ 
te que a força pode também diminuir durante um combate. Por 
vezes diminui bastante quando o jogador é ferido. 

Se a sua força diminui para menos de l (linha 190), o progra¬ 
ma envia a execução para a subrotina de morte iniciada na linha 

2290: 


22 

1 ™ - 


M 

^ * a- 

■ ■ r ■ i J 

4 4 

i > k ■> 

4 h 

m o ¥+ ■■ ■ ■ 

23 

00 

Pt 

M 

4 HO 

RT 

E 

F ■ 

C* w 

10 

Pi 

■ i ■ 

1 

N T ' 1 

> F ■ 

íj Q 


E MORREU »- 

i _■ 

20 

G 0 


5 U B 


2 

0 

2 

■30 

GO 


T fi 1 

k 

£0 






Quando se constrói um programa, tende-se a descobrir — 
dentro de certos limites — que quanto maior é o número de coi¬ 
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sas que o jogador deve manipular simultaneamente mais satisfa¬ 
tório se torna o jogo. O leitor deve portanto tentar ler no seu 
programa algo do género da FORÇA que usamos aqui, e um 
castigo pesado, como a nossa rotina de Morte, para o caso dc es¬ 
se problema não ser encarado satisfatoriamente. 

Pontuação final 

A pontuação final de “Os Lobisomens e o Aventureiro'’ está 
relacionada — como já indicámos — com um certo número de 
factores. Um destes é o RELATÓRIO, o tempo durante o qual 
conseguimos sobreviver. De cada vez que o programa executa a 
Rotina Principal, passa pela linha 200 que incrementa o RELA¬ 
TÓRIO de um: 


200 LtzT RílLPTOkIü =RELPTGR IÜ4 i 

No final do programa, quer tenhamos encontrado a saída ou 
não, a pontuação é aumentada. Passa a equivaler a três vezes o 
valor de RELATÓRIO, mais cinco vezes o de FORÇA e duas ve¬ 
zes o de RIQUEZAS; é-lhe ainda somado o valor da COMIDA 

não ingerida e trinta vezes o número de monstros mortos (variá- 

!*■ 

vel MM). E evidente que o número de monstros mortos tem um 
efeito maior sobre a pontuação final do que praticamente qual¬ 
quer outro elemento. Vejamos a secção de código que determina 
a pontuação final: 



Existe um número infinito de maneiras de calcular a pontua¬ 
ção final em jogos de aventuras. O sistema que aqui usamos é 
bastante simples, e talvez o leitor esteja interessado em modificá- 
-lo. Desde que os seus jogos disponham de algum modo de deter¬ 
minar o êxito ou o fracasso de quem “vive” a aventura, não é de 
facto importante qual o método usado. Pode ser muito ou pouco 
elaborado. 
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Manutenção do Status Quo 


Como viu no exemplo de execução que apresentámos antes de 
iniciar o estudo do programa, o jogador obtém um relatório do 
estado em que se encontra de cada vez que o programa volta à 
rotina principal. 

Este Relatório de Estado é executado pelas linhas que se se¬ 
guem à 210. Vejamos a primeira secção do Relatório de Estado: 


£ 10 > P RINT N$ ; " A 5 UR 


ENERGIA 


NERGIR E 


£20 Ii~ R IU E Z A > 0 i HcM fRíNT 
M 4 M ;RIQUEZA 

£30 Ir C0M 1 DH > 0 THEN PRINT 
I 5ACC Dt ^'ROvTõÜES CONTtíi’* 
IDA; *' UNIDADES " DÍ"C0MIDfl ,i 
£4-0 IF FRT0=I THEN PRINT ,: E 
H UsRR R RRMADURH” 

£5 0 Ir MACHADO =0 AND £5-'ADH 
ND AM*JLttO=0 THtN GO TO 3£O 
£60 PRIríT :, 7P.AZ CONSIGO 
£70 IF MRCHAD0=1 THEN PRINT 
MACHADO* 

=80 Ir ■ ESPADA = 1 THEN PRINT 
ESPADA" 

£90 IF ESPRDR+MACHADO>0 RND 
LET0=i THEN PRINT "E " ; 

300 Ir RMULET 0=1 THEN PRINT 
RMULETO MAGICO” 

■310 PR 1 NT 


í \ 
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5-HDH = 
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N PRINT 'UMA 


R M L* 


- ■ n 

■l 


O seu nome é usado na linha 210 (N$, indicando Nome), antes 
de lhe ser dito qual a sua FORÇA e RIQUEZAS (linha 220). Se a 
variável COMIDA é maior do que zero (linha 230), o computa¬ 
dor sabe que você comprou alguma comida que ainda não co¬ 
meu, e a linha 230 imprime uma mensagem neste sentido. O mes¬ 
mo acontece quanto à armadura (linha 240), o machado (270), a 
espada (280) e o amuleto mágico (300). As outras linhas (as que 
imprimem coisas como “ESTÁS A TRANSPORTAR” e a pala¬ 
vra “E”) também utilizam o valor das variáveis MACHADO, 
ESPADA e AMULETO para determinar quando devem ser im¬ 
pressas palavras intermédias. 




Faça-se luz 

A presença ou ausência de um archote é crucial em muitos 
programas de aventuras, incluindo este. A variável LUZ é colo¬ 
cada inicialmente em zero, o que significa que o jogador não ad¬ 
quiriu unj archote. 

Se o jogador não dispõe de um archote, não consegue ver na¬ 
da. Está muito escuro no interior do castelo. As linhas 320 e 330 
constituem então a nossa Rotina Claro/Escuro. Se o jogador 
não possui um archote (isto é, se a variável LUZ é igual a zero) a 
rotina imprime ESTÁ MUITO ESCURO PARA VER, e nada 
mais acontece. Sc no entanto você transporta um archote (isto é, 
LUZ igual a 1) a linha 330 envia a execução para a extensa su- 
brotina que se inicia na Unha 990 e que descreve o que se vê na 
sala. 

■ 3£0 IF LUZ =0 THEN PRINT 'ESTA- - 

DEMASIADO ESCURO PRRR UER" 

_330 IF LUZ = i THEN GO SUB 990 : R 
tM *Dt 5 CRICAÜ DA SALA* 


Mais adiante, a LUZ será novamente usada. Na rotina de Re¬ 
colha do Tesouro, a primeira linha verifica se você dispõe de um 
archote. Se tal não acontecer, é-Ihe dito que “ESTÁ DEMASIA¬ 
DO ESCURO PARA VER”, e torna-se impossível recolher as 
riquezas: 


£370 IF LUZ =0 THEN PRINT *' 

DEMASIADO ESCURO PRPR UER :; 
UB 3520 : RETURN 




Distribuição dos objectos 

O leitor recorda certamente que o sétimo elemento de uma sa¬ 
la, no quadro A, indica o conteúdo dela. Se este elemento for ze¬ 
ro, não existirá na sala nenhum objecto que o jogador possa ma¬ 
nipular. 

A rotina de Manuseio de Objectos depende completamente 
deste sétimo elemento. A linha 340 define a variável K, tornan- 
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do-a igual a este elemento, A linha 350 verifica o valor de K, sa¬ 
bendo que no caso de ser zero a sala se encontra de facto vazia. 
Se K for maior do que nove (ver a linha 360), o computador sabe 
que existem riquezas na sala. Se a sala nào está vazia (K = 0) e 
não contém riquezas (K>9), deve conter necessariamente um 
monstro, e a linha 370 dá-nos esta boa notícia. 


34.0 LET K =fl «.Sfi í 7J : REM *K DEFIN 
E CONTEÚDO DR SR LR* 

353 I.= K“0 THEN GG TO 4-4-0: RtM 

*SRLR‘ URZIR* 

350 IF K>9 THEN PRINT ,J EXISTEM 
HOUI RIOUEZRS NO URLOR DE $";K: 
GO TO 4-4-3 

370 PRINT : PRINT : PRINT "CUlD 
RDO ! t5TR'' H O UI UM MONSTRO!' 1 : GO 
5uS 3520 


REM 


K 


Se existir um monstro na sala (isto é, se K for inferior a zero) a 
variável MS (“Monstros”) recebe o nome de um dos monstros. 
A variável FF (“factor de ferocidade”) recebe também um va¬ 
lor. Quanto maior for, menor será a possibilidade de vencer o 
combate contra o monstro em causa. 

No entanto, como verificará quando estudarmos a rotina 
Combate mais adiante, as armas que você possui, e o facto de es¬ 
tar ou nào a usar armadura, podem modificar em seu favor o 
factor de ferocidade. 

A secção de programa que se segue (linhas 380 a 440) atribuem 
a M$ o nome do monstro, a FF o factor de ferocidade, e dizem- 
-nos em seguida o que se passa: 
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t h mm * • *mm i t í 

“ j FF; "í í M 

44-0 GO 3 UB 3520 


IX 

INTERPRETAÇÃO DAS ORDENS 

O programa “Os Lobisomens c o Aventureiro” reconhece um 
vocabulário bastante limitado. Se bem que isto diminua o realis¬ 
mo da aventura até certo ponto (se é que este ambiente pode al¬ 
guma vez ser considerado realista...), simplifica bastante a cons¬ 
trução do programa e assegura rapidez de execução, 

O programa aceita as nossas ordens nas linhas 450 a 470, 

perguntando-nos “QUE QUER FAZER?” 

Podemos escrever a palavra inteira (por exemplo NORTE) ou 
apenas a primeira letra. Como se pode ver, a última parte da li¬ 
nha 460 corta a entrada a apenas um caracter, pelo que nào há 
necessidade de escrever mais do que a letra inicial. 



Vejamos agora qual o vocabulário aceite pelo programa: 

N — Norte 
S — Sul 
E — Leste 
O — Oeste 
U — Subir 
D — Descer 
L — Lutar 
F — Fugir 

M — Magia (Amuleto, usado para nos transportar aleatoria¬ 
mente para outra sala do castelo) 
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1 — Inveniano (para aumentar as suas posses, e usa o p 

pvemnlo nara comprar alimentos ou um machado) 

q _ Desistir (para terminar a aventura em qualquer monun 

to) 

G — Guardar (riquezas) rpHnyirfa <se 

neSrio) a uma só letra, o programa desenha uma Unha no v,- 

^or a ffrn de organizar melhor a apresentação da mlormaçào. 

Se tiver escrito Q (de “desistir”), o programa passa directa- 
meme paia a íinha 120. onde calcula e imprime a sua pontuação 

final. 


PRINT : C PIN> 


y k INT 


KlNT 
4-90 I! 


R$ = : ’ 0 


THEN so TO 120 


Como se explicou no inicio do livro, o computador sabe a par¬ 
tir do conteúdo do quadro A quais as direcções validas a partir 
da sala onde o jogador se encontra Vamos ^rquecenvada 
uma mensagem diferente em função da direcção em qut deseja 
mos mover-nos. Isto dá-nos a impressão de que o computador 
està a escolher entre uma vasta gama de respostas possíveis, cm 
vez de dizer apenas "NÃO PODE IR POR AI”. 


^00 Ir H S = N 
N _ PRINT "NRG 
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Combater ou fugir 

Quando se enfrenta um monstro, pode-se escrever “L” (se se 
pretende lutar) ou ”F” (se se prefere fugir). Mas. como não que¬ 
remos encorajar a cobardia, 70% das vezes em que se escreve 
“F" o computador dirá que é impossível fugir, 

A linha 560 é usada para produzir um número aleatório entre 
zero e um no caso de se escrever “F", e se este número aleatório 
for maior do que 0,7 o programa salta para a Rotina da Fuga 
Impossível: 


560 IF 
0 T0 24- 


RS = ,r F 
0 


RND RND 


THEN 



Quando o seu desejo nâo é atendido, o computador imprime 
“NÀO, DEVE FICAR E LUTAR”, mudando em seguida a or¬ 
dem para ”L” e voltando ao campo de acção: 


24-10 REM 
24-20 REM 

EXITO* 


rf- j j X ^ -X -X -4 X X + .V 't Y 1 4 ^ j 

+ * i ■ I I -K i ■ II II IP | ■ ■ i I ■ # k l\ ÍV P ■ ■ ■ II IP 

íTENTRTIUR DE FÜGR 5 


24.30 PRINT "NRO . DEUE FICRR E 
TRR " 

24-4.0 LET Rí = i: L” 

24-50 G0 SUB 3520 
24-60 GO TÕ 590 



Se, no entanto, o número aleatório produzido nâo for maior 
do que 0,7, o computador pergunta-lhe em que direcção deseja 
fugir: 

570 IF h4 = j, F" THEN PRINT "PflKH 
ONDE QUER í“UG!R'? M : G0 TO 4-60 


Existe ainda uma outra possibilidade. Um jogador pode escre¬ 
ver ”L” quando não existe qualquer monstro na sala. Um pro¬ 
grama mal escrito pode então apresentar um monstro caído do 
céu aos trambolhões... O nosso programa resolve o assunto veri¬ 
ficando, no caso dc ser escrita essa ordem, se o sétimo elemento 
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do quadro é inferior a zero; se não o for imprime “NÃO HA 
AQUI NINGUÉM COM QUEM LUTAR” e volta à linha 440 

para receber nova ordem: 



X 


FALAR NOUTRAS LÍNGUAS 

Vejamos agora uma rotina que actua sobre as outras entradas 
possíveis: 

5S0 IF A$= M I M THEN GO SUB 3010: 

RETURN 
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IF 


1 1 Q f i 

THEN 

GO 5 

UB 2350: 

RETURN 
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7O0 Ir fií= ,1 D M THEN LET 5 A=hÍSA, 


6) 

710 RETURN 


O leitor verificará (na linha 600) que no caso de o jogador ter 
escrito “C" (indicando que deseja comer) é verificado se existe 
ou não comida disponível. Se a variável COMIDA é igual a zero, 
é impresso pela máquina “NÃO TEM COMIDA”, voltando o 
computador à linha 440 a fim de aceitar uma nova ordem. 
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As linhas 650 a 700 deslocam o jogador no interior do castelo, 
como já foi explicado anieriormente. 

Fazer magia 

Se escrevermos “M” (indicando que queremos usar o amuleto 
mágico para mudar de sala), seremos transportados para um ou¬ 
tro local do castelo de forma aleatória (mas nunca para a entra¬ 
da ou a saída dele). É apenas necessária uma linha para conse¬ 
guir isto: 


630 JF 0$ = ,J M n THEN LET SflslNT í 

RND*19)+1: IF SR=5 OR 50=11 THEN 
GO TO 630 

635 IF = THEN GO Tü 710 


Se escrevermos “C” (comer) somos enviados para a rotina 
Comer Alimentos, que se inicia na linha 2470, e na qual o com¬ 
putador começa por verificar se dispomos de alguma comida. Se 
tal não acontecer (isto é, se a variável COMIDA for igual a zero) 
o programa sai da subrotina. 

Se tivermos comida, o computador diz-nos qual a quantidade 
de que dispomos, e em seguida pergunta-nos quanta queremos 
comer (linha 2520). Cada unidade de comida dá-nos cinco uni¬ 
dades de força (linha 2560). Depois de um curto atraso (chama¬ 
do por 2570), o programa volta à rotina principal: 


24.70 REh 
2430 REM 
24-90 CLS 


icOMER************** 


2500 IF COMIDA<1 THEN RETURN 
2510 PRIHT “TEM J * j COMIDA; " UN 
DE5 DE COMIDO' 1 



2520 PRINT M 0UONTRS QUER INGERIR 
? r * 


2530 INPUT 2 

254.0 IF Z> COMIDO THEN GO TO 2530 
25*0 LET CQMIDflsINT ÍCÜMIDP-Z) 
2550 LET ENERGIO=INT (ENERGIA+ 5* 

2570 GO SUts 3520: CL 5 
2530 RETURN 
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Recolha dos tesouros 


A rotina de Recolha dos Tesouros a partir da linha 2340 reali¬ 
za duas verificações antes de podermos guardar qualquer tesou¬ 
ro. 

Em primeiro lugar, o programa verifica se existe de facto algu¬ 
ma riqueza no local onde nos encontramos (linha 2360), obri- 
gando-nos a dar outra ordem se nào existir e escrevendo '‘NÃO 
EXISTE AQUI NENHUM TESOURO”. Depois de passar esta 
verificação, o computador descobre se dispomos de um archote. 
Já discutimos isto antes, quando observámos a Rotina Cla¬ 
ro/Escuro. A linha 2370 foi sublinhada nesse estudo, e é esta que 
faz a verificação. 

Se ambas as verificações deram resultado positivo, é somado à 
nossa riqueza o valor do tesouro encontrado (linha 2380), “esva¬ 
ziando-se” a sala (linha 2390) passando a zero o elemento apro¬ 
priado a fim de nào podermos voltar à sala e recolher a mesma 
riqueza repetidas vezes. 


234-0 RtM ** ** **** ******* * * * * * 
2350 kEM *GUORDOR RIQUtZPS* 
2360 IF 0(50,7) <10 THEN PRINT 
OO EXISTE PQÜI NENHUM TESOURO*' 
GO SUB 3520: RETURN 
2330 LET RIQU£ZO=RI0UEZO +PíSO, 
2390 LtT 0(50,7)=0 


4-00 


r\ 


TU RN 



Objectos disponíveis 


Um dos mais importantes testes de qualquer programa de 
aventuras — além dos de sobrevivência no ambiente criado — é 
a gestão dos nossos recursos. O leitor recorda certamente o que 
já disse sobre o facto de quanto maior for o número de coisas 
que o jogador deve fazer, mais satisfatório se torna o programa. 

Se bem que o leitor saiba, por exemplo, que necessita de um 
archote para conseguir ver e poder recolher tesouros, é possível 
que urn novo jogador demore algum tempo até tirar esta conclu¬ 
são. Ao novo jogador basta conhecer o vocabulário a empregar, 
o facto de perder se ficar sem forças, e que o objectivo do jogo é 
descobrir a saída do castelo. 
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Quando estamos a conceber um programa de aventuras, deve¬ 
mos definir exactamente o que devemos dizer ao jogador antes 
de o jogo começar. Um jogo de aventuras em computador asse¬ 
melha-se a um puzzle, no qual o jogador tenta resolver os pro¬ 
blemas construídos pelo programador. Em “Os Lobisomens e o 
Aventureiro", tal como acontecerá nos programas que o leitor 
tentará escrever, ocorrem muito mais coisas do que a simples re¬ 
solução de um puzzle. 

A Rotina de Ínventário/Provisões deste programa é uma das 
chaves para o controlo do jogo. Depois de um jogador com¬ 
preender que o archote ê um objecto vital, e que pode adquiri-lo 
acedendo a esta rotina, e que a posse de um machado, uma espa¬ 
da ou um amuleto mágico pode ser muito útil, estará em boas 
condições para assegurar a sobrevivência até conseguir definir o 
mapa do castelo. 

A Rotina Inventário/Provisões explica-se em grande parle a si 
mesma. Vejamos: 


3000 

3010 

30£0 

icr 

3030 

304-O 

GO 

30^0 

;t ■■ 

3050 

307O 


KEM ******************** 

REM *INUENTARIO/PRüUISÜE 
PRINT "PR0UIS0ES & INUENTAR 


GO SUB 3250 

IP RIQUEZA'.! THEN LET Z =0; 
0 3130 

PRINT "DOCE PODE COMPRAR: 

1 - ARCHOTt ( $Í5 


PRINT " 2 - MACHADO ($10 
PRINT " 3 - ESPADA ($20) 


3030 PRINT IJ 4- - ALIMENTOS í$ 
2/UNIDADE) 11 

3090 PRINT Jí 5 - AMULETO MAGI 
CO t$3Q)' J 

3100 PRINT " 5 - ARMADURA í $5 

0 ) " 

3110 PRINT " 0 - CONTINUAR AU 

ENTURA i! 

3120 INPUT "NUMERO DA 0PCR07 ")Z 
3130 IP Z=0 THEN CL5 : RETURN 
314-0 IP Z = 1 THEN LET LUZ=.l: LET 

RIQUEZA=RIOUEZA-15 



31^0 Ir Z =2 THEN LET MACHADO=1: 

LET RIOUEZA=RIOUE2A-10 

3150 IP Z = 3 THEN LET ESPADA = i: L 

ET PIOUEZA =PIOUEZA-20 

3170 IP 2=5 THEN LET AMULETO =1: 

LET RIOUEZA=RIOUEZA-30 

3130 IP Z =5 THEN LET FATO = 1: LET 

RIOUEZA=RIOUEZA-50 

3190 IP RIQUEZA<0 THEN PRINT “TE 

MT OU ENGANAR-ME!'*: LET RIQUEZA =0 

LET i-AT0 =0 : LET LUZ=0 : LET ES- 
ADA=0: LET AMULETO=0: LET COMIDA 
= INT í COMIDA/A) : GO SUB 3520 
3200 IF Z<:>4 THEN GD TO 3030 
3210 InPUT “QUANTAS UNIDADES" "; 
0: LET 0 = INT ÍO) 

3220 IF 2*0>RIQUEZA THEN PRINT " 
NAO TEM DINHEIRO SUFICIENTE". GO 

TO 3210 

3230 LET COMIDA=CÜMIDA+Q 
3240 LET RIQUEZA =RIOUEZA-2*0 
3250 GO TO 3030 

3250 Ir RIOUEZA>0 THEN PRINT : P 

RINT : PRINT “UÜCE TEM í";RI0UEZ 
A 

3270 IP RIOUEZA=0 THEN PRINT "NA 
0 TEM DINHEIRO": GO SUB 3520 - P£ 

TURN 

3230 FOR J=1 TO 4: PRINT : NEXT 

] 



E fácil ver que o programa começa por verificar a quantia de 
que dispomos (passando à subrotina que se segue a 3260), e 
inlormar-nos do estado das nossas linanças. Se não dispusermos 
de dinheiro reenvia-nos para a rotina principal (3040), ou seja, se 
a variável RIQUEZAS tem um valor menor do que 0,1. 

Em seguida sào apresentadas as possibilidades de compra, 
juntamente com um número de código que as identifica. Escre¬ 
vemos 1 se quisermos adquirir um archote, por exemplo, 6 sc 
quisermos a armadura, ou ainda 0 para voltar ao programa prin¬ 
cipal. Depois de indicarmos a opção escolhida (3120), o compu¬ 
tador utiliza as linhas 3130 a 3180 para nos permitir “fazer a 
compra", modificando o valor das variáveis e subtraindo o cus¬ 
to a RIQUEZAS. Isto é sempre verdadeiro excepto no caso de 
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COMIDA (quarto elemento do “menú”), que é tratada de um 
modo um pouco diíerente. 

Não tente enganar a máquina comprando mais do que pode. 
A drástica linha 3190 imprime “TENTOU ENGANAR-ME!’* e 
retira-lhe tudo o que você tem — excepto um quarto da comida. 

Se tiver escolhido o quarto elemento, indicando que deseja 
comprar comida, a rotina das linhas 3210 a 3240 tratará do as¬ 
sunto. 

A última subrotina (linhas 3260 a 3290) diz-nos quanto dinhei¬ 
ro temos (se nos restar algum), imprime quatro linhas em bran¬ 
co, e volta ao menú. Esta rotina mantém-se em execução — co¬ 
mo disse anteriormente — até escrevermos zero, indicando que 
desejamos continuar a aventura. 
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XI 


O COMBATE 


Os combates constituem muitas vezes os pontos mais altos do 
jogo. Faça tudo o que íhe for possivel para utilizar as potenciali¬ 
dades sonoras e gráficas do seu computador no sentido de me¬ 
lhorar as situações de combate. 

Convirá portanto melhorar desse modo toda a sequência de 
combate de Os Lobisomens e o Aventureiro, acrescentando de¬ 
pois efeitos semelhantes nos seus próprios programas. 

O combate consiste em três segmentos distintos, cada um dos 
quais poderá ser encarado como uma tarefa de programação di¬ 
ferente. Os três segmentos, que discutiremos um de cada vez, são 
o de Preparação, o Combate propriamente dito, e o Resultado. 


Esteja preparado 

O segmento de combate utihza a instrução INKEYS (a propo- 
sito, o leitor poderá substituir praticameme todas as entradas 
desta aventura por instruções INKEYS). A linha 740 espera ate 
que o leitor deixe de tocar no teclado, e em seguida imprime (li¬ 
nha 750) a mensagem “CARREGUE EM QUALQUER TECLA 
PARA COMBATER". A linha 760 interrompe a acção até se 

carregar numa tecla 

Vejamos o segmento de Preparação do programa 


720 PEM *****£*■****** 
730 PEM *CGMBATE* 



74-0 IF INKEYJ = "" THEN GO TO 7*0 

750 PRINT '* CARREGUE NUMA 

TECLA. " 


750 IF INt* EYís ,ÍM THEN GO TO 750 
770 IF FATO^l THEN PRINT 11 A ARM 
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ADURA AUMENTA AS SUAS POS- SIBIL 
IDADES DE ÊXITO": LET FF=3*INT \ 
FF/4-) : GO SUB 3520 
730 CL3 FOR J = 1 ! O 6: PP.IMT 

■ 1 '' '■fc- # I * * + ■ 1 P l J ■ ri + 4 ri j I > fV I H ri* ■ ri IP II ■> ■■ ■■ p-fc «■ +ri %■> I 1 Pt U ■■ ■ ■ r •■ 

M : NEXT J 

790 IF MACHADO=0 AND ESPADA=0 T 
HEN PRINT " UOCE NAO TEM ARMAS" : 
PRINT "DEUE LUTAR DE MAOS NUAS" 
Le:T rF=INT írF+rF/s) ; GO TO 37 

0 

300 IF MACHADO=1 AND ESPADA=0 T 
HEN PRINT " UÜCE TEM UM MACHADO" 

: LET FF=4.*INT (FF/5) : GO TO 370 
310 1r MACHADO=0 AND ESPADA=1 ; 
HEN PRINT "UAI LUTAR COM A ESPAD 
A": LET FF=3*INT (FF/4.): GO TO 3 
70 

320 INPUT "OUE ARMA QUER USAR í 
i^M ACHADO ; 2-ESPADA)7 " ; Z 

*30 IF Z<1 OR Z >2 THcN c-0 TG 32 

0 

34-0 IF Z*i THEN LET FF=4.*INT ÍF 
F / 5 i 

850 IF Z =2 THEN LET FF=3*INT <F 
F/4-) 


THEN LET FF=3*INT 




O leitor recorda eertamenie, daquilo que já dissemos sobre 


monstros, que a variável FF significava 


“factor de ferocidade”. 


e que quanto maior for o seu valor menor será a sua possibilida¬ 
de dc derrotar o monstro. Se estiver a usar armadura (como a li¬ 


nha 770 o informará), as suas probabilidades de êxito aumen¬ 
tam, porque FF adquire três quartos do seu valor anterior. 

Se não tiver quaisquer armas (isto é, se MACHADO for igual 
a zero e o mesmo acontecer a ESPADA), FF e aumentada de um 
quinto. É importante em programas como este dar ao jogador 
uma boa razão para gastar o seu dinheiro em objectos como ar¬ 
mas. O ajuste das possibilidades de êxito — como acontece aqui 
na alteração do valor de FF — constitui um modo de realizar es¬ 
se objectivo. 

Se tiver um machado e uma espada, as linhas 820 e 830 permi- 
tern-lhe escolher entre ambas as armas, modificando as suas pro¬ 
babilidades de vencer em função delas. 
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Pegar em armas 


O combate propriamente dito é controlado pelas linhas 880 a 
940: 


360 RtM ** 
370 REM *A 
330 PRINT 
390 IF RND 

TACA-O": GO 

395 PRINT 
900 GO SUB 
910 IF RND 


1 + v 1 v m ^ ^ ^ i ^ ^ ^ ^ T 

*H LUTA* 
r : PRINT 

ND > , 5 THEN PRINT Mi.. 1 ' 
G0 TO 900 
f "UÜCE ATACA" 

UB 3520 

ND >,5 THEN PRINT : PR 
DNSEGUE FERI-LO": LET 


A 


T "UÜCE CONSEGUE FERI-LO": 
F = INT í&* Fr /6) 

920 GO SUB 3520 
930 IF RND >,5 THEN PRINT 
T "0 MONSTRO ATINGE-O!"; L 
RGIA=ENERGIA-5 

94-0 IF kND>.3& THEN GO TÜ 


v RI N 


L 


PR IN 
ENE 


390 


Esta rotina dirige de facto o combate, mantém um papel de ár¬ 
bitro e indica ao jogador o que se está a passar. De cada vez que 
conseguimos ferir o monstro (linha 910), o factor de ferocidade é 
reduzido a cinco sextos do seu valor anterior. A nossa força di¬ 
minui de 5 de cada vez que o monstro nos fere. Dois terços das 
vezes que o computador atinge a linha 940 volta à linha 890 con¬ 
tinuando o combate. 


Desaparece o tumulto e os gritos 


A linha 950 compara um número produzido aleatoriamente 
entre zero e quinze com o factor de ferocidade, e se aquele for 
maior dá-nos a vitória, acrescentando uma unidade à variável 
MM (que conta o número de monstros mortos). Se o jogador 
perde, a linha 960 informa-o desse facto e diminui para metade a 
força que lhe resta. 

Vejamos a secção dc código que avalia o resultado do comba¬ 
te: 


7 L 




950 IP RND*16>FF THEN PRINT : P 
RINT "5 UGCE CONSEGUE MATAR O" 

$; LET MM=MM+i: GO TO 970 
9S0 PRINT : PRINT "0 UEN 

CEU í '* : LET ENERGIA = INT (ENERGIA/ 


970 LET A í SA , 7) =0: GO SUB 3510: 

PRINT : PRINT : GO SUB 3520: RE 
TURN 

A última linha desta secção *‘limpa” o monstro, e depois dc 
uma pausa imprime algumas Unhas em branco e uma segunda 
pausa, reenviando a execuçào para a rotina principal do progra¬ 
ma. 

Como já disse no inicio deste capitulo, o combate é uma área 
dos programas de aventuras em que quaisquer eleitos que possa¬ 
mos incluir são bem-vindos. O leitor deve obter algumas ideias 
sobre o modo de melhorar as sequências de combate na versão 
mais elaborada deste programa que apresentarei mais adiante, 
mas não lhe será certamente difícil descobrir muitas outras de¬ 
pois de ter compreendido o tipo de métodos a usar. 
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XII 


ESPREITANDO AS SALAS 

As descrições das salas acrescentam uma terceira dimensão à 
planta grosseira de um ambiente de aventura, Podemos acres¬ 
centar tantos pormenores quantos quisermos para descrever ca¬ 
da sala ou caverna descoberta pelo nosso aventureiro, ou pode¬ 
mos manter descrições curtas, deixando à imaginação do joga¬ 
dor o cuidado de preencher as lacunas. 

Prefiro seguir um curso intermédio, acrescentando algumas 
dcscnçòcs, mas não muitas, capazes de desencadear a imagina 
çào do jogador mas não de a substituir. 

Esta secção do programa è muito simples de compreender. A 
comprida linha ON GOSUB (1010) envia a execuçào para a sala 
adequada, imprimindo uma breve descrição desta e indicando a 
disposição das janelas e salas. 

O leitor deverá consultar agora as plantas dos vários andares, 
verificando como se relacionam com as descrições indicadas em 
seguida: 


930 REM ******************* 

990 REM *OESCRICAG DAS SALAS 
1000 PRINT PRINT M ********* 

********************“: PRINT 
RINT 


1010 IP 
ET U R N 

1011 IP 
ET U R N 

1012 IP 
ETURN 

1013 IF 
ETURN 

1014 IP 
ETURN 

1015 IP 


SA = 1 


5A = 


5H =6 


HEN GO SUB 1040 


5A=3 THEN GO SUB 1170 


A =4 THEN GO SUB 1230 


SA =5 THEN GO SUB 1230 


HEN GO 


UB 1350 


* * 

■ ■ TI 

P 


K 


THEN GO SUB 1100: R 


í I 


R 


O 


H 
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Sfl = 9 THtN 1 

30 v 1 

UB 

154-0; 

Sfl = 10 

THEN 

GO 

5 U B 

1620 : 

Sfl = 11 

THEN 

GO 

S UB 

1700 ; 

Sfl = 12 

THEN 

GO 

5 UB 

1730 : 

5 fl = 13 

THEN 

GO 

SUB 

1790 : 

Sfl = 14- 

THEN 

ij 0 

5 U B 

1360; 

SA = 15 

THEN 

GO 

5 U B 

1960; 

Sfl = 16 

THEN 

GO 

SUB 

2030 ; 

Sfl =17 

THEN 

GO 

SUB 

2100 : 

Sfl=13 

THEN 

GO 

SUB 

21S0 : 

Sfl = 19 

THEN 

GO 

SUB 

2230: 

* 4 ^ 4- 

r + ri ► i ■■ 

^ 

1 b IV II II II 

ií ^ í ^ ^ ^ ^ í 
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1170 REM *5RLfl 3* 

1130 PRINT "ESTR" NUMfl SflLfl GRRN 
Dc, EM FORMflDE L" 

1190 PRINT "EXISTEM PORTAS fi EST 
E E fl NORTE" 

1200 PRINT "NR flLCOUfl EXISTE UMR 
PORTR PRRR OESTE" 

1210 RETÜRN 

1220 REM 44 4 * * 4 * *•* 4 4 * 4 4 4 4 44 4 * 

^ ■ T ■ r 1 ■ I ■ ■■ ■■ ■ H ■■ I ■ ^ ^ | ■ ( ■ I ■ ^ m || i m ■ | B | , T fc ^ B , 

1230 REM iSflLfl 4* 

124.0 PRINT "ESTR" NR SRLR DO CON 
SELHG PRIUA-DO DO REI" 

1250 PRINT "EXISTE UMR SRIDR fl S 
UL 

1260 RETURN 

1270 REM 44 4 4 444444444*444444 

. m * .... ■ ■ ■ > -k i* i f ■ f iV -V 7. ;v 

1280 REM *SflLfl 54 

1290 PRINT "ESTE flTRIO INTERIOR 

POSSUI UMR PORTR fl NORTE E OUTR 

H H O ESI*™ ÍT 

1300 PRINT “ALEM DE UMR ESDflOfl C 
IR C U í_ R R M 

1310 PRINT "OUE flTRRUESSfl UERTIC 

RLMENTE fl SRLR" 

mentrl" INT ' yüCE UE LflG0 0RNR 

fl^SUL" RINT ‘‘ flTRflyES Dfls ANELAS 
1340 RETURN 

1350 ReM *44444*44*4444444444 

1360 REM *SRLR 64 

12 7 S PRINT "ESTR-' NR ENTRADA DE 

p2SI^ L0 em pedra, de rprrenc 

IR TERRIUEL"' 

1330 PRINT "UOCE ENCONTRR-SE UIR 
RDO PRRR ESTE" 

1390 RETURN 

14-00 REM 44444444444444*44* 

14-10 REM 4SflLfi 74 

1420 PRINT "UOCE ESTR" NfiS COZIN 


"RTRAUE 


Dfl 


.íflNELRS 


1420 PRINT "UOCE ESTA" NRS COZ 
Mfls DO CA3- TELO.” 

1430 PRINT "flTRAUES DE JANELAS 
A PAREDE NORTE , CONSEGI IE UE 
O JARDIM DASDflhflS" 

1440 PkIWT "EXISTE UMA PORTA fl 
UL" 

14&0 RcTURN 

1460 RcM 44444444*4444444444 

1470 REM íSflLfl 34 


N 


D 
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14-30 PRINT "ENCONTRR-SE NR DESPE 
N5A t ENTRE ’ 1 

1490 PRINT "ESPECIARIAS , UEGETAI 
5 i MUITOS SACOS DE FARINHA £ 0 
UTRA5 PRÜUI-SÜE5" 

1500 PRINT "EXISTE UMA PORTA PAR 
A NORTE" 

1510 PRINT "E OUTRA UIRADA A SUL 


1520 RETURN 

1610 REM ******************* 

1620 REM *5ALA 10* 

1630 PRINT "UOCE ENCONTRA-SE NO 
UESTIBULO TRASEIRO" 
lü4.0 PRINT ‘ EXXsTEM uANtil—H-r 1 A -z*U 
L , DAS QUAIS" 

1650 PRINT "SE CONSEGUE UER O LA 
GÜ ORMAMEN- TAL" 

1550 PRINT "EXISTE UMA SAIDA *AR 
A LESTE. E" 

1S70 PRINT "OUTRA PAPA NORTE'' 
ISSO KüTURM 

\7\ D?M + + ^ 

H 3 & b' ■" k ^ 1 1 ■ ■ M I ■ ■ 1' ^ #■ -. 

1730 REM *3ALA 12* 

174-0 PRINT "ESTA" NUMA MASMORRA 
ESCURA E HÚMIDA" 

1750 PRINT "EXISTE UMA ÚNICA SAI 
DA, UMA" 

1750 PRINT "PEQUENA ABERTURA NA 
PAREDE A OESTE" 


MASMORRA 
ÚNICA SR 


RTURH ^ i R 


í I * 


1770 RETURN 
•17^0 Rs-M 

1790 REM *SALA 13* 

1300 PRINT 1 ■ UOCE ESTA' NA SALh 
O CRRCEREI- RO, NOS SUBTERRÂNEO 
DO CASTELO" 

1310 PRINT "A tSCADA TERMINA NtS 
X R 3 R í_ R 

1320 PRINT "EXISTE AINDA UMA OUT 
RA o AI L' # A : 

1330 PRINT "UMA ABERTURA V IRADA 
A E := > TE" 

134.0 RETURN 

1350 REM ******************* 

1350 PEM *SALA 14-* 

1570 PRINT "ENCONTRA-SE NOS APOS 
ENTOS DO REI, NO NIUEL SUPtKl 
OR DO CAS- TELÒ" 

1390 PRINT "OLHANDO PARA BAIXO t 


■i R: 


V 


k n • i 


i i ií 
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Oi O 


PARA OCI- 
NELA PODE" 
1900 PkINT 
TELO.í 

1910 kkINT 
PODE SEP 
NORTE" 

1920 PRINT 


DENTE, ATRAUES 


Di 


JH 


j J : 


UcR A cNTRADh l?u l-hs 

E O JARDIM DAS DAMAS 
UISTO PELA JANELA A 


Tí. t 


1 1 


E XIS T E M 


I I 1 


OPTAS PhRA 


1930 PP INT "PAPA SUL' 

194-0 RETURN 

1950 R'EM * * * .* 4 * 4 + 4-4 4. * 4 . 4 4. * 4-+ 

• * ™ ™ 1 ■ ■ fc F ■ 4 ■ ■■ i ■ f I I- T+ F ■ ¥ ■ í ' 1 í ‘ ' * 

1950 REM *5AlA 15* 

1970 PRINT "ESTA'' NO ATRIO EM rO 
RMA DE i_" 

19 d 0 * PRINT H NORTíz ^NuuN ! KH — St 
UMA PORTA , 11 

1990 PRINT "E EXISTE AINDA UMA E 
5CADA " 

2000 PRINT ;í CONSEGUE-SE UER O LA 


H NORTSz iL-UN ! KH -j 


EXISTE AINDA UMA E 


2000 PRINT ;; CONSEGUE-SE UtR U Lh 
GÜ DAS JANE-LAS UIRADAS A SUL 1 ' 
2010 RETURN 

2020 REM 444444444444444-44444 

■■ ■■ J ■ F- +■ 'i JT* I- *■ H h * • I ■ 1 ■ ■« ■ J ■■ 

2030 REM *5ALO 15* 

204.0 PkINT "ESTA SOLO Eul ANTIGO 
MENTE USADO" 

£050 PRINT 'COMO SOLO DO TESOURO 


2060 PRINT "NO.G EXISTEM UONELOS; 
APENAS" 

2070 PRINT "SOIDAS PORO NORTE E 


2030 RETURN 

2090 PEM 4 44444444444444444-44 

W 4 1 1 i h ■ f 1 m ^ m | | II 4 ■ j ■ p\ +4 ^ ^ f ■ I H i ■■ W iJ 

2100 REM *SOLA 17* 

2110 PRINT "OOOH. . , ESTO'' NO ONT 
ISO OUORTO" 

2120 PRINT "DOS CRIADOS" 

2130 PRINT "EXISTE UMA SOIDO POR 
0 OESTE E UMA PORTO PORO SUL” 
214-0 RETURN 

2150 REM **jfr*K **4 * * z z ± * *■■* * * z- 
2150 REM 4S0L0 13* 

2170 PRINT "ESTO PE9UENR SOLO L>0 
PISO SUPE- ftlOR £' 0 SOLO DE UE 


UMO UONELO PO 


i 1 ■ n ■ ii ■■ -F 


2130 PRINT "EXISTE UM 
RA NORTE," 

2190 PRINT "DE ONDE E 


ÜSSIUEL 
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1550 

PRINT 

1 r u o c E 

E NT R 0 U N u 

EL EUR 

Onp " 





1S50 

GO SUB 

3520 



1570 

PRINT 

"EST A" 

R DESCER 

LENTR 

MENTE 

j i 




1530 

G 0 5 U B 

3520 



1590 

LET SR 

—m. h" 



1600 

G 0 T 0 

1000 




A outra sala que necessita de um tratamento especial é a sala 
11, a saída final. Quando o computador atinge a subrotina rele¬ 
vante, encontra imediatamemc uma instrução de retorno. Esta 
"subrotina'’ existe apenas para facilitar a compreensão do pro¬ 
grama; 
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™ 1 ■ ' ¥+ PB ■■+ 1 r M ■ ■ - T - M M 1 T | I* IF li . \ 

1700 REtt + 5RLR II* 

1710 R ETüR N 


Depois de ter conseguido atingir a sala 11, o programa deixa 
de executar o ciclo e anuncia ao jogador o seu êxito: 


*0 PRINT : PRINT "CONSEGUIU!:" 
GO 5U5 3520: fkINT "E'‘ E5TH h 
SRIDR 00 CRSTEL0. . . 11 
50 GO SUB 3520 

70 PRINT ; -RIM T "TERMINOU E5T 

R RUENTURfi ; 11 , N$; Jr í í " 

30 PRINT PRINT J '3RIU OH r.R = r 
ELO" 

90 GO SUB 3520 

100 PRINT PRINT "CUMPRIU R 5U 
R MISSRG" 

110 >j0 jUC 1 3520 


V* í I n — > "7“ í . ‘i •— i i 

i _- U nr r, i' • —j ' u 1 


O programa passa desta rotina para as linhas 120e 130, que já 
discutimos, imprimindo a pontuação e terminando o jogo. 
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XII l 


OS LOBISOMENS E O AVENTUREIRO 


Espero que o leiior lenha introduzido o programa na máqui¬ 
na, secção por secção, à medida que estas foram discutidas. É es¬ 
sa a melhor maneira de aprender os vários aspectos da progra¬ 
mação desta aventura, e de determinar o melhor modo de apro¬ 
veitar estas mesmas ideias nos seus próprios programas. 

Apresentamos agora a listagem completa do programa, a fim 
de permitir ao leitor verificar se existem erros na listagem intro¬ 
duzida na máquina. 


10 REM 

05 LüsISOMtNS c 0 AUENTUREIRÜ 
20 00 SUB 2500: REM SlNICIRLII 
RR* 

5 0 0 0 5U8 ISO 

4-0 IF Sh < >11 THEN 00 TO 30 
50 PRINT : PRINT 'CONSEGUIU! ! ' 
00 SUB 0520 : PRINT , ’E / E 5 TR R 
3 RIDR DO CASTELO,.." 

50 00 5 UB 5520 

70 PRINT : PRINT "TERMINOU ESI 
R AUENTURA,"" ! í " 

50 í” 1 RINT •— 1 RINT íH Jü D u H -z 1 1 


\ \ 1 I I 1 1 i l 

^ n í 


n 


“H 5UR PONTUA 


90 00 SUt? 3520 

100 PRINT : PRINT "CUMPRIU R 5Ü 
R MISSÃO" 

110 00 SUB :1520 

120 PRINT : PRINT “R 5UR PÜNTUH 
CRO E" 

IÍ0 PRINT 0 * A £ LATORIO 4 o * ENe, ROiR 
+2*RIQUEZR+CCMIDA+30*MM 
14-0 3T0P 
150 REM 

160 REM -ROTINA PRINCIPAL* 
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i 


' I 1 l i 

í"' st 


170 L5T £NERGIfl=ENERGl!fl-5 
130 Ir tMtRGIR-ílO THüN PRINT "C 
UIDRDÜ ,■ " i N4 , " ESTR '* FRRÜÜ í " : PRI 

ÍST 

190 IF ENERGIA-íi THEN GO TO 230 
0 : RcM *MOR i E* 

200 LET RELATORIO ^RELATOR IO41 
210 PRINT MS, " , A iÜA tNtRGlfl £. 
" : ENERGIA 


220 IF RIQUEZA>0 THEN PRINT 


1 I 


M ; RIQUEZA 

230 IF COMIDA>0 THEN PRINT "0 5 
EU 'SACO DE PKÜUISOtS CONTtn" ,■ COM 


IDA;" UNIDADtS Dt COMIDA” 

240 IF FATÜ = 1 THEN PRINT "ESTA" 
A USAR A ARMADURA" 

250 JF MACHADO=0 AND tSRADA =0 A 
ND AMULETO =0 THEN GO TO 320 
250 PRINT "TRAZ CONSIGO "■ 


ÍÜNSIGO 


270 IF MACHADO = 1 THEN 
MACHADO" 


PRINT "UM 


230 Ir n5PADA=l THEN PRIN! "UHh 
ESPADA" 

290 IF ESPADA+MACHADÜ >0 ANl> AMU 
LET0—1 THEN PRINT "E " ; 

300 IF AMULETO=1 THEN PRINT "0 
AMULETO MAGICO" 

310 PRINT- 

320 IF LUZ =0 THEN PRINT "ESTA 
DEMASIADO tSCURO fARA UER" 

330 IF LUZ = I THEN GO SUE 990: R 
EM *DESCRICAO DA SALA* 

340 LET K=AÍSA,7); REM *K DEFIN 
E CONTcUDO DA SALA* 

350 Ir K=0 THEN GO TO 440: RtM 
*SALA UAZIA* 

3S0 IF K>9 THEN PRINT "EXISTEM 
AOUI RIQUEZAS NÜ UALOR DE S";K: 
GÜ TO 440 

370 PRINT : PRINT : PRINT "CUID 
PDÜ! tSTA' AGUI UM MONSTkO ! " : GÜ 
SUB "i t' 2 0 

330 ÍF K=-i THEN LET M$ = ,! FEROZ 
LOBISOMEM": LET FF=5 

39B IF Ks-2 THEN LET M$="FANATI 

Cü E^TRIPhDuh’ LtT rF = 10 

400 IF K = -S THEN LET M4 ="MALErI 
CO FANTASMA": LET FF=15 
410 IF K. = -4 THEN LET M$ - ” DtUfiST 


í ÍH 


H M U 


- I ^ 

t \ 


H 


340 


1 _i 
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ADOR DRAGAO DO GEL 
420 PRINT : PRINT 
430 PRINT : PRINT 

IJ :FF: M I I '■ 


LET Fr =20 
E '* UM ";MS 
0 PERIGO E- 


440 GO ‘o UB 3520 
450 PRINT PRINT 
DESEJA FAZER? " 

460 INPUT A$: LET 
470 IF K<0 AND A $ 
"F" THEN GO TO 4Õ0 
430 PRINT : PRINT 


K H IN T 


: 1 0 U 


P5 — $ l \ Tu li } 

>"L” AND Ai- 


PRINT 


RINT 

4.90 IF A$ = “0" THEN GO TO 12 
500 IF A$="N" AND A<SR,1)=0 


P 


H 


N PRINT "NAO HA'' 
GO TO 4.4.0 


SAIDA POR AI 


510 IF A$="S" AND AÍSh,2>=0 THE 
N PRINT "NAO EXISTE SAIDA A SUL" 
: GO TO 4-40 

520 IF A$ = "E" AND A(5A,'3)=0 THE 
N PRINT "NAO PODE PROSSEGUIR PAR 
A ESTE": GO TO 440 
530 IF AS="0" AND AÍSA,4)=0 THE 
N PRINT "NAO PODE RTRAUES5AR PAR 
EDES": GO TO 440 
540 IF A*="U" AND AÍSA,5)=0 THE 


N PRINT "NAO PODE SUBIR POR AQUI 
" : GO TO 440 

550 IF Rs="D" AND AÍ5P,S1=0 THE 
N PRINT "NAO PODE DESCER POR AQU 
I": GO TO 440 

560 IF AS="F" AND AND>.7 THEN G 
0 TO 2420 

570 IF A$ = "F" THEN PRINT "PARA 
ONDE QUER FUGIR?": GO TO 460 

530 IF A$=“L" AND At'SA,7)>-i TH 
EN PRINT "NAO HA" AQUI’ NINGUÉM C 
ÜM QUEM LUTAR": GO TO 440 

590 IF A$ = "I" THEN GO SUB 3010: 

RETURN 

600 IF R*s"C" AND COMIDA=e THEN 

PRINT "NAO TEM COMIDA”: GO TO 4 
40 

510 IF A$ = "G" THEN GO SUB 2350: 

RETURN 

620 IF A$="L" THEN GO TO 730 

630 IF A$="H" THEN LET SPRINT í 


RND-S-193 +1: IF SA=6 OR SA=II THEN 
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GO TO 630 

S35 IF A4="M" THEN GO TO 710 
64.0 IF A$="C" THEN GO SUB 24-30: 
RETURN 

650 IF A4="N" THEN LET SRsRÍSA, 
11 

660 IF Aí="S" THEN LET SA=AÍSR, 


:71 


0 I 


A1="E" THEN LET 5A=A (5 A, 


630 IF A4=”0" THEN LET SA=A(SA, 
4.) 

690 IF A4="U" THEN LET SR=RÍSR, 

5) 

700 IF A$="D" THEN LET SA=A(SA, 

6 ) 

710 RETURN 

720 REH ***************HiHm 
730 REH «COMBATE* 

74-0 IF INKEY$ = "" THEN GO TO 74.0 

750 PRINT " CARREGUE NUMA 

TECLA a " 

760 IF INKEY$="" THEN GO TO 760 
770 IF FflTO = 1 THEN PRINT "fl ARM 
ADURA AUMENTA RS SUAS POS- 5IBIL 
IDADES DE ÊXITO": LET FF=3*INT í 
FF/4-) : GO SUB 3520 
730 CLS : FOR J=1 TO 5: PRINT " 

******************************** 
": NEXT U 

790 IF MACHADO=0 AND ESPADA=0 T 
HEN PRINT " UOCE NAO TEM ARMAS": 
PRINT "DEUE LUTAR DE MROS NUAS" 

: LET FF=INT (FF+FF/5): GO TO 37 
0 

300 IF MACHADO=1 AND ESPADA=0 T 
HEN PRINT " UOCE TEM UM MACHADO" 
: LET FF=4.*INT (FF/5) : GO TO 370 
310 IF MACHADQ=0 AND ESPADA=1 T 
HEN PRINT "UAI LUTAR COM A ESPAD 

A": LET FF=3*INT (FF/4.) : GO TO 3 
70 


A=AÍSA, 


IF A4="U" THEN LET SA=AÍSA, 


A$="D" THEN LET SA=A(SA, 


RETURN 

REM ******************** 

REM *COMBATE* 

IF INKEYÍ="" THEN GO TO 74-0 
PRINT " CARREGUE NUMA 


320 INPUT "QUE ARMA QUER USAR ( 
1-MACHADO; 2-ESPADA)? ";Z 
330 IF Z<i OR Z >2 THEN GO TO 32 

0 

84.0 IF Z = 1 THEN LET FF=4-*INT (F 
F/5) 

350 IF Z =2 THEN LET FF=3*INT (F 
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1013 

Ir 

ET U R N 


1014- 


ETURN 


1015 

ip 

ETURN 


1015 

Ir 

ETURN 


1017 

Ir 

ET U R N 


1015 


ETURN 


1019 

Ir 
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=11 

THEN 

GO 

SUB 

1700: 

= 12 

THEN 

GO 

SUB 

1730: 

— -1 -"5 

™ fL d _ l 

THEN 

GO 

5 U 3 

1790: 

= 14- 

THEN 

GO 

SUB 

136® : 

= 15 

THEN 

GO 

SUS 

1960: 
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122® REM 444444*4*4*****44**4 

123® REM *SALA 4-* 

124.® PRINT "ESTA"' NR SPLP DO CON 

5ELH0 PRIUA-DO DO REI M 

1250 PRINT "EXISTE UM PI SRIDH P o 

UL ,: 

1250 RETURN 
1270 REM 

1250 REM 4SPLP 54 

129® PRINT '‘ES TE PTRIÜ INTERIOK 
POSSUI UMP PORTP P NORTc E OUTR 
fl R OESTE M 

1300"PRINT 'RLEM DE UMP ESCADA C 
IRCULfiR" 

1310 PRINT "QUE BTRRUESSR UERTIC 
RLMENTE R SflLfi" 

1320 PRINT "UOCE U£ UM LflGO ORNR 
MENTAL" 

1330 PRINT "ATRAVÉS DAS UAN&LAS 
fl SUL" 


"ATRAVÉS DAS 


JANELA 


134-0 RETURN 

1 :?Ri3 PFM + 

^ H « V * ■ ^ I I + r i* M ■■ ... 1*.. . T> ... 

1360 REM 4SPLP 54 

1370 PRINT :, ESTP-' NP ENTRPDP DE 
UM CPSTELO EM PEDRP ,■ DE PPflRENC 
IP TERRIUEL" 

1330 PRINT *'UOCE ENCONTRA-SE UIR 
PDO PPRP ESTE J ' 

1390 RETURN 

14-00 PEM 44 4444444444444444 
14-10 REM 4SPLP 74 


14-20 PRINT "UOCE ESTA' NP5 COZIN 
MPS DO CP5- TELÜ." 

14-30 PRINT "PTRPUE3 DE JANELAS N 
P PPREDE NORTE; CONSEGUE UER 
O JARDIM DPSDPMPS" 

14-4-0 PRINT "EXISTE UMP PORTP P S 
UL" 

14-5® RETURN 

14-60 REM 44 4 4444 44444 444 4 44 4 

14-70 REM 4SPLP 54 

14-30 PRINT 11 ENCONTRR-SE NP DESPE 
NSP, ENTRE' 1 

14-90 PRINT "ESPECIARIAS, UEGETAI 
5, MUITOS SPCOS DE FARINHA E O 

LITPPS PCrUIT-flnFS 1 ' 

1500 PRINT "EXISTE UMP PORTP PAR 
P NORTE" 

1510 PRINT "E OUTRA UIRADA P SUL 


N 










1530 

154-0 


RETURN 

REM *******************■ 

&FM *FA! Q Q«. 

PRINT "UOCE ENTROU NO EL 


ELEUA 


DOR" 

1580 

1570 

MENT 

1530 


GO SUB 3520 
PRINT "ESTA 


h DESCER LcNTA 


1580 GO SUB 3520 

1590 LET SR =10 

1600 GO TO 1000 

1510 REM »»»»»»»»»»»»»*»»»»» 

1520 REM »SALA 10» 

1530 PRINT "UOCE ENCONTRA-SE NO 
UESTIBULO TRASEIRO” 

154-0 PRINT "EXISTEM JANELAS A SU 
L, DAS QUAIS" 

1650 PRINT ”SE CONSEGUE UER O LA 
GO ORNAMEN- TAL" 

1660 PRINT "EXISTE UMA SAIDA PAR 
A LESTE E" 

1670 PRINT "OUTRA PARA NORTE” 
1530 RETURN 

1620 REM *■* ** *4*4 ** * * * * a * •** 

^ ™ ™ ™ ■ 1 + * ** * * i ' f I 1 h 1* n I 1 ■ ¥ i 1 * ■ ■■ 4* rh * *■ rik ia * k P* 

1700 REM »SALA 11» 

1710 RETURN 

1720 REM »»»»»»»»»»»»»*»»»»»» 
1730 REM *SALA 12» 

174-0 PRINT "ESTA-' NUMA MASMORRA 
ESCURA E HÚMIDA" 

1750 PRINT "EXISTE UMA UNICA SAI 
DA, UMA" 

1760 PRINT "PEQUENA ABERTURA NA 
PAREDE A OESTE" 

1770 RETURN 

1730 REM »»»»»*»»»»»»»»»»»*»» 
1790 REM »SALA 13» 

1300 PRINT "UOCE E5TAL NA SALA D 
O CARCEREI- RO, NOS SUBTERRÂNEOS 
DO CASTELO" 

1310 PRINT "A ESCADA TERMINA NES 

Tp 5pLp'' 

1320 PRINT "EXISTE RINDR UMR QUT 
pp SRIDR " 

1330 PRINT ; UMfi RSERTURh UIRhl>h 
fl ESTE" 

134-0 RETURN 

1350 REM ******************** 

1360 REM *SRLR 14-* 


1630 

1690 

1700 

1710 

1720 

1730 

174-0 
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1970 


" ■ v 

r* n 

INT 

RMR 

D. 

E 

; * 1 

1930 


PR 

INT 

UMR 

PORTR, 

1990 


PR 

INT 

SCflD 

R 

■ 1 


2000 


■* ¥ 

INT 

GO D 

R 

■ 

O 

J fi N 

2010 


P t 

TÜ R 

2020 


P t 

M * 

2030 


Q <T 

M * 

204-0 


PR 

INT 

MENT 

E 

U 

SRD 

20í?0 


PR 

INT 
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rn o 









I 


EXISTE UMfl JflN 


í 


H M 


TA A 
2210 
2220 
2230 
2240 

UENA 

2250 



'UMA OUTRA PORTA COND 


5T IR" 

2160 PRINT 
RA NORTE," 

2190 PRINT "DE ONDE E' POS5IUEL 
UER 0 JARDIMMAIS ABAIXO" 

00 PRINT "EXISTE AINDA UMA POR 

5i iL " 

SJRN 

DPM x^Ct[ Ci ’T □ x 

PRINT "UQCE”ÉNTR0U NUMA PEQ 
SALA FORA DO CASTELO" 
PRINT "EXISTE UM ELEUfiDOR, 
NO QUAL SE ENTRA POR UMA PORTA 
A NORTE" 

2260 PRINT 
UZ A OESTE" 

2270 PRINT "PODE UER O LAGO ATRA 
UES DAS JA- NELAS UIRADAS A SUL" 
2230 RETURN 

PtM 

■ ■ tfP ■ I i r a à ít ■■ a p i H i * 7a ■ a a-% a + i ■■ ■■ BB ■ ■ i* r* 

REM «MORTE* 

PRINT "UOCE MORREU..." 

GO SUB 3520 
GO TO 120 

REM ******************** 

REM «GUARDAR RIQUEZAS* 

IF A(SA,7!(10 THEN PRINT ”N 
AO EXISTE AQUI NENHUM TESOURO": 
GO SUB 3520: RETURN 
2370 IF LUZ =0 THEN PRINT "ESTA' 
DEMASIADO ESCURO PARA UER": GO S 
UB 3520: RETURN 
2330 LET RIOUEZAsRIOUEZA+A(S 
2330 LET A(SA , 7)=0 
4-00 RETURN 

4-10 REM ******************* 

4-20 REM «TENTATIUA DE FUGA 
EVITO* 

24-30 PRINT "NAO, DEUE FICAR 


22A0 
00 
310 
2320 
2330 
34-0 
23a0 
2330 


> f 


M 


LL 


TAR" 
2440 
2450 
2450 
470 
2460 
2490 
2500 
510 



^ < i : i i 


± S '' 1 

GO SUB 3520 



GO TO 

REM **£****■************* 

REM *COMtR* 

CLS 

IF COMIDA ri THEN RETURN 
PRINT "TEM COMIDA;" UNIDA 





5 DE COMIDA 1 ' 

2520 PRINT "QUANTAS QUER INGERIR 


1 1 


2530 
540 


533 




INPUT Z 

IF Z>COMIDA THEN GO TO 2_ 

COMIDAaINT «COMIDA-Z) 
LET ENERGIA=INT ÍENERGIA+5* 



RET 
RtM 
REM 
CL 5 


3 fJ t» 

URN 


0 


H x ri 



LET 



LF 


) 

2570 
2560 
590 
2500 
2510 
2520 
2530 
2540 
2550 
550 

NSTRO 
2670 
2^30 
2530 
2700 
2710 
2720 

2730 NEXT C 
740 NEXT B 
750 INPUT "QUAL 
EXPLORADOR? "; Ní 
2750 CL6 

2770 LET 5H = 5: PtM 




* ■ a" ■■ a| ■ i ia hp ■ "a a B a- ri p f • ■ ■■ w h t ■ a.' ■■ a- a - ■ 

*INICIALIZAR* 


ENERGIA = 100 
RIQUEZA=75 
COMIDA =0 
T RtLA;ORIO=0 
T MM=3> REM sNUMERO DE MO 
M ORT Ow'í 
RE ti + 

“ v ® p 1 p p PT a ■■ p ■ |i f f ^ j ji p ■ 41 f ■ ■ % h a ■ a f ■ ■■ th 

REM íDEFINIR CASTELO* 

DIM A(19,7) 

FOR 6=1 TO 19 
FOR C=1 TO 7 

READ A i3 ; O > 


a _► a a ■ ■ a 


E 


O UEU NOME 


*P05ICA0 INIC 



LE? 
L 




IAL í'5A=N. DA SALA) * 

2730 
2790 
300 
2310 
2320 
330 
2340 
350 
2350 
2370 



ESPADA=0 

AMULETO=0 
MACHADO =0 
FATO =0 
LUZ=0 

r ' ■* ■ aa ■ ■ a* è a ■ I è a 4 a* a> * tt a-a p ■■ a - * t a a+ ■ t ■■ ■ 

«DISTRIBUIR TESOURO* 
J=1 TO 4- 

M = INT iRND*19)+1 
M=3 OR M=ll OR AÍM,7) 
THEN GO TO 2 

2330 LET R(M,7>=INT <RND*100S+ 
2390 NEXT J 

2900 REM ******************** 

2910 REM *DI5TRI3ÜIR MONSTROS* 

2920 FOR U = 1 TO 4- 

2930 LET M=INT (RND*13)+1 


L 
REM 
REM 
FOR 



>0 

10 











294-0 IF M=5 OR M = ll 
THEN GO TO 2930 
2950 LcT A(M,7)=-J 


OR A <M,7) <>0 


29fi0 

2970 


NEXT J 

LET fi (4,7) =100 + INT <RN£>*100 


2930 LET A(15,7)=108+INT (RND*iO 
0 ) 

2990 RETURN 

3000 REM ******************** 
3010 REM *INVENTARIO/ PR O V IS O ES * 
3020 PRINT "PROVISOES Í-. INVENTAR 
IO" 

3030 GO SUB 3250 

304-0 IF RIQUEZA . 1 TMEN LET Z=0: 
GO TO 3130 

3050 PRINT "UOCE PODE COMPRAR: 

I - ARCHOTE (SIS 


LET A(15,7)=100+IN 


RETURN 

REM ******************** 

REM *INUENTARIO /PRO VISÕES* 
PRINT "PROVISOES -1 INVENTAR 


3060 PRINT " 

) " 

3070 PRINT " 


- MACHADO ($10 


3 - ESPADA ($20) 


3080 PRINT " 4. - ALIMENTOS ($ 

2/UNIDADE)" 

3090 PRINT " 5 - AMULETO MAGI 

CO (530)" 

3100 PRINT " 6 - ARMADURA ($5 

0 ) " 

3110 PRINT ” 0 - CONTINUAR AU 

ENTURA" 

3120 INPUT "NUMERO DA OPCAO? "iZ 
3130 IF Z =0 THEN CLS : RETURN 
314.0 IF Z = 1 THEN LET LUZ=1: LET 
RIQUEZA=RIOUEZA-15 
3150 IF Z =2 THEN LET MACHADO=1: 
LET RIQUEZA=RIOUEZA-10 
3160 IF Z=3 THEN LET ESPADA=1: L 
ET RIQUEZA=RI0UEZA-20 
3170 IF Z=5 THEN LET AMULETO=1 
LET RIQUEZA =RIOUEZA-30 
3130 IF 2=6 THEN LET FATO=l: LET 
RIQUEZA=RIOUEZA-50 
3190 IF RIQUEZA<0 THEN PRINT "TE 
NTOU .ENGANAR-ME! ": LET RIQUEZA=0 
LET FATO =0: LET LUZ=0: LET ESP 
ADA =0: LET AMULETO=0: LET COMIDA 
= INT (COMIDA,'4.) : GO SUB 3520 
3200 IF Z < > 4- THEN GO TO 3030 
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0 , 0 , 0 , 0 , 0 : 

REM 5RI¬ 

3,0,0,0,0 : 

REM Sfli- 

S ; 2 , 0 , 0 , 0 

REM SAÍ¬ 

0,0 , 0,0,0 : 

REM SAÍ¬ 

0,3,15,13,0 

REM 5 

1 , 0,0,0 , 0 : 

REM SAL 

0,0,0,0,0: 

REM SAL 

,0,0,0,0,0: 

REM SA 

,0,3,0,3,0: 

REM SA 

11,0,0,0,0: 

REM SA 

10,0,0,0,0: 

REM SA 

0,13,0,0,0: 

REM SA 

12,0,5,0,0: 

REM SA 

,17,0,0,0,0 

: REM S 

, 0,0,0,5,0 : 

REM SA 
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RLR 15 

3470 DhíH 13,15,3,14/0;0,0: REM 
SRLR 17 

3430 DRTR 0,17 ; 0,0,0,0,0: ReiM SR 
LR 13 

3490 DRTR 9,0,15,0,0j0,0: RtH SR 
LR 19 

3500 REM ******************* 

3510 REM *RJU5TE 0 RTRRSÜ RD SEU 
GOSTO* 

3520 FOR T =1 TO 900: NEXT T 
3530 RETURN 
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XIV 


ACABAMENTOS 


Depois de conseguir pôr o seu programa em funcionamento, 
comportando-se exactamente como espera, o seu trabalho não 
está ainda terminado. Pode ser que durante algum tempo o pro¬ 
grama o satisfaça tal como está; mas mais tarde acabará por 
querer transformá-lo, melhorá-lo. 

O leitor dispõe de uma versão razoável de “Os Lobisomens e o 
Aventureiro”. Conhecendo já os aspectos básicos da criação de 
programas de aventuras, estará provavelmente a caminho da 
realização da sua primeira aventura “épica”..* 

Mas pode acrescentar ainda muitas coisas a este programa, 
tornando-o mais interessante para outros jogadores. Depois de 
passar algumas semanas com o programa na sua forma original, 
eu próprio resolvi melhorá-lo um pouco. 

No capítulo que se segue o leitor poderá encontrar uma versão 
melhorada deste programa; e neste mesmo capítulo encontrará 
um exemplo de execução da nova versão, a fim de ter uma ideia 
do que foi acrescentado. 

Não renumerei o programa, o que permitirá ao leitor modifi¬ 
car facilmente a listagem original alterando apenas algumas li¬ 
nhas e acrescentando outras entre elas. 

j* 

E melhor comparar as duas listagens, linha a linha (em parti¬ 
cular na parte que descreve as salas) para ter a certeza de que in¬ 


troduziu todas as modificações. Para simplificar isto, vamos dis¬ 


cutir as principais modificações introduzidas: 


— O archote pode cair das nossas mãos durante um combate 
— 905,915. 

— As armas podem igualmente ser arrancadas das nossas 
mãos durante um combate — 906, 907. 

— Foram acrescentados mais monstros — 415,416 c 2920. 
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— É possivel encontrar jóias, eic., em vez de ‘'tesouros” não 
identificados — 355, 357. 

— Note que nem todas as portas se encontram agora descritas 
explicitamente, deixando à habilidade do jogador a descoberta 
das saídas possiveis. Por outro lado as salas sào descritas em 
maior detalhe, sendo adicionados certos factores que apenas sur¬ 
gem de vez em quando. O leitor deverá portanto verificar todas 
as descrições de salas, descobrindo as alterações introduzidas. 

— É possível pedir um relatório da situação em qualquer mo¬ 
mento do jogo, escrevendo “R” quando é pedida uma ordem — 

706. 

— Foi incorporado urn efeito — que o leitor poderá certamen- 
tc elaborar ainda mais — quando é usado o amuleto mágico — 

625. 

— A rotina de Inventário inclui agora uma indicação dos ob- 
jectos adquiridos — limpe as linhas 3120/3130 e acrescente as li¬ 
nhas 3131. 3133, 3134 e 3135. Será necessário renumerar outras 

linhas para 3136 e 3137. 

— As riquezas e a força iniciais são agora determinadas alea¬ 
toriamente no inicio de cada jogo — 2620, 2630. 

Vejamos um exemplo de execução da versão melhorada: 

ANDREU, A SUA ENERGIA E ’* 45 
TEM $1 

0 SEU SACO DE PR0UIS0E5 CONTEM 

6 UNIDADES DE COMIDA 

TRAZ CONSIGO UM MACHADO 


^ ^ ^ í ^ ^ ^ ^ íf 1 í ^ í ^ ^ ^ ^ ^ ^ ^ ^ ^ 


ESTA" NA ENTRADA DE UM CASTELO 
EM PEDRR , DE RPRRENCIA TERRIUEL 
UÜCE ENCONTRA-SE UIRADO PARA 


QUE DESEJA FAZER? 

E 
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UOCE ESTA’ NO ATRIO 
PELO PO" QUE SE ESPALHA NO SOLO, 
ADIUINHA-SE QUE NINGUÉM AQUI 
PASSA DESDE HA" MUITO! 

EXISTE UMA PORTA A SUL 
ATRAUE3 DE JANELAS A NORTE CON¬ 
SEGUE UER 0 JARDIM DAS DAMAS 


QUE DESEJA FAZER? 


ANDRELI, A SUA ENERGIA E 36 
TEM $1 

O SEU SACO DE PROUISQES CONTEM 

S UNIDADES DE COMIDA 

TRAZ CONSIGO UM MACHADO 




ESTA" NA CAMARA DE AUDIÊNCIAS 
EXISTE UMA JANELA A OESTE 
OLHANDO PARA A DIREITA ATRAUES 
DELA CONSEGUE UER A ENTRADA DO 
CASTELO 

ENCONTRA JOIAS NO UALOR DE *76 


QUE DESEJA FAZER? 


G 


PR0UI30ES & INUENTARIO 






UOCE TEM *77 


UOCE PODE COMPRAR: 

1 - ARCHOTE í*15) 

2 - MACHADO í*10> 

3 - ESPADA (*23) 

4. - ALIMENTOS «42/ÜNIDADE) 

5 - AMULETO MAGICO i*30> 

6 - ARMADURA í*50) 

0 - CONTINUAR AUENTURA 
UOCE TEM UM ARCHOTE 
O SEU EQUIPAMENTO INCLUI UM MA¬ 
CHADO 


NUMERO DA OPCAO? 


ANDREW, fl SUA ENERGIA E'' 25 

TEM *1 

O SEU SACO DE PROUISOES CONTEM 
9 UNIDADES DE COMIDA 
ESTA' A USAR A ARMADURA 
TRAZ CONSIGO UM MACHADO 
UMA ESPADA 




4 


ESTA' 1 NA CAMARA DE AUDIÊNCIAS 
AS TAPEÇARIAS DAS PAREDtS DAO 
UMA IDEIA DO ANTIGO ESPLENDOR 

rjFíTfi sfll O 

EXISTE UMA'JANELA A OESTE 
OLHANDO PARA A DIREITA ATRAUES 
DELA CONSEGUE UER A ENTRADA DO 
CASTELO 


ANDREU ; A SUA 
TRAZ CONSIGO 



ESTA' DEMASIADO ESCURO PARA UER 

CUIDADO! ESTA' - AQUI UM MONSTRO! 
E ■' UM DEUASTADOR DRAGAO DO GELO 
O PERIGO E'' 20 í í 

OUE DESEJA FAZER? 


L 


#Í*#ÍÍÍ*****Í*****í*í*Í*i******* 

■■ “■ H F ■ I 1 I 1 I 1 ■■ ■■ ■■ ■■ ■■ H L ■■ II f h ■■ ■■ 1 ■ ■■ q H ai ■■ ■■ IV i 1 t ri j ■ ■ 4 ■ 1 ■ 1 m h i> 

UOCE NAO TEM ARMRS 
DEUE LUTAR DE MAOS NUAS 


C DEUASTADOR DRAGAO DO GELO ATAC 
A~0 

UOCE QUER FUGIR, MAS RESISTE AO 
MEDO . . . 

SENTE 0 CHEIRO A ENXOFRE NO HÁ¬ 
LITO DO MONSTRO... 

UOCE NUNCA ENCONTROU UM OPOSITOR 
TAO FORTE! 

O DEUASTADOR DRAGAO DO GELO ATAC 
A-G 

O MONSTRO RTIN6E-0! 

UOCE CONSEGUE FERI-LO 
OS OLHOS DO MONSTRO FAÍSCAM DE 
ODIO. . . 

DAS SUAS GARRAS ESCORRE SANGUE! 
ELE GOLPEIA-O SELUATICAMENTE... 

O DEUASTADOR DRAGAO DO GELO ATAC 
A-0 

UOCE CONSEGUE FERI-LO 

5ERA' ESTA UMA LUTA DE MORTE? 
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OS OLHOS DO HONSTRO FAÍSCAM DE 
ODIO . . . 

SENTE O CHEIRO R ENXOFRE NO HÁ¬ 
LITO DO HONSTRO... 

ELE GOLPEIA-O SELUATICAMENTE... 

O MONSTRO ATINGE-0 ! 


O DEUASTADOR DRAGAO DO GELO UENC 
EU! 


ANDREU, A SUA ENERGIA E*' 47 
ESTA* DEMASIADO ESCURO PARA UER 


QUE DESEJA FAZER? 
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XV 


VERSÃO MELHORADA 


Vejamos agora a listagem completa da versão revista de “Os 
Lobisomens e o Aventureiro*’. Como disse no capítulo anterior, 
esta listagem não foi renumerada. Se assim o desejar, pode no 
entanto utilizar a versão renumerada incluída no apêndice. 


10 REM 

O o LuB I w" >M t. N 5 


E O AUENTUREIRO 


11 REM sUERSAÜ MELHORADA* 

£0 GO SUt? 2600: REM fclNICIALIZ 
AR* 

'30 GO SUB lb0 

'í-O If~ Sh /11 THtN t?Ü TO J0 
50 PRINT ; PRINT "CONSEGUIUít" 

: GO SUB 3520: PRINT "E‘‘ ESTA A 
SAIDA DO CASTELO. . . " 

D0 *_r0 UB 20 

70 PRINT ; PRINT "TERMINOU EST 
A AUENTURA;",N$;"í í" 

SO PRINT : PRINT "CONSEGUIU SA 
IR DO CASTELO!" 

90 GO : = ,i lg :^^20 

100 PRINT :"PRINT "CUMPRIU A SU 
A MiSSAO" 

120 PRINT*’ : “PRINT "A SUA PONTUA 

0 Ç\ \T[ ^ - J f ' 

ISO PPINT 3*RELAT0RI0t 5*ENERGIA 
+£*RIQUtZA+CDMIDA+30*MM 
140 S!CP 
150 í?EM 

■■ ■ I II- |+ m *• « # i I p ■ j J 1 * ■ I -P \ Pb II -PI- ¥■ ■ ■- ¥ ■ ■ ¥ ■ ^ ■ w i-h 

150 REM íROTINPI PRINCIPAL* 

170 LET ENERGIfl=ENERGIfl-5 

150 IF ENERGIR■< 10 THEN PRINT "C 


“CUMPRIU R 5U 


“ft 5UR PONTüfi 
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UIDADÜ, " j N$ , "ESTA'' FRACO * " : PRI 
MT 

190 IP EMERGIR<1 THEN GG TO 230 
0: REM *finRTE* 

200 LET RELATORIO=RELATORIO+1 
£10 PRINT N$;", fl SUA EMERGIR E 
";EMERGIR 

220 IF RIQUEZA/0 THEN PRINT "TE 

M ± J f 1 D Tn 1 f = tO 

£30 7 ÍF COMIDA>0 THEN PRINT “0 5 
EU SACO DE PR0UIS0E5 CONTEM", COH 
IDRj " UNIDADES DE COMIDA" 

£4-0 IF FRT0 = 1 THEN PRINT "E5TR'' 
fl USRR R RRMRDURR" 

250 IF MflCHRDO=0 AND ESPADA=0 fl 
ND AMULETO=0 THEN GO TO 320 
260 PRINT "TRAZ CONS.IGO " , 

270 IF MACHADÜ=1 THEN PRINT "UM 
MACHADO" 

230 IF”eSPADA=1 THEN PRINT "UMA 
ESPADA " 

290 IF ESPADA+MACHADO>0 AND AMU 
LETO = 1 THEN PRINT "E 
300 IF AMULETCsl THEN PRINT "0 
AMULETO MAGICO” 

310 PRINT 

320 IF LUZ =0 THEN PRINT "ESTA ' 
DEMASIADO ESCURO PARA UER" 

330 IF LUZ=1 THEN GO SUB 990: R 
cM *DESCRICflO DA SALA* 

34-0 LET K = A 15 A , 7) : REM *K DEFIN 
E CONTEÚDO DA SALA* 

330 Ir K=0 THcN GO TC 4-4-0. REM 
*3ALA UAZIA# 

355 LET M=RND 

357 IF K>9 AND M<=.5 THEN PRINT 
"ENCONTRA JOIAS NO UALOR DE S"; 
K: GO TO 4-4-0 

380 IF K > 9 AND M>.5 THEN PRINT 
"EXISTEM AQUI RIOUEZAS NO UALOR 
DE í";K: GO TO 4-4-0 
370 PRINT : PRINT : PRINT "CUID 
ADO! ESTA" AQUI UM MONSTRO!": GO 
SUB 3520 

330 IF Ks-1 THEN LET H$="FEROZ 
LOBISOMEM”: LET FF =5 
390 IF. K = -2 THEN LET M$ = ”FfiNATI 
CO ESTRIPADOR”: LET FF=10 
4.00 IF K=-3 THEN LET MS = ”MALEFI 
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CO FANTASMA”: LET FF=15 
410 IF K =-4 THEN LET MS="DEUAST 
ADOR DRAGAO DO GELO”: LET FF =20 

415 IF K=-5 THEN LET MS=”HORRIU 
EL UNICORNIO": LET FF =25 

416 IF K =-6 THEN LET M$ = "GIGANT 
E DESGRENHADO”: LET FF=30 

420 PRINT : PRINT "E' UM ":M4 
430 PRINT : PRINT ”0 PERIGO E' 

ii, & er ■ í • i i j > 

> i i / ! : 

4-4-0 RH 5 UB 3^20 

450 PRINT : PRINT : PRINT ' 1 QU5 
DESEJA rAZER? " 

460 IMPUT A4: LET AS=A*Í TO 1) 
470 IF K <0 AND A4<>"L" AND Ajo 
”F" THEN GO TO 460 
430 PRINT : PRINT : PRINT "- 

-p 

RINT 

490 IF A5 = "0" THEN GO TO 120 
500 IF Aí = "N" AND AUõA,l)=0 THE 
N PRINT "NAO HA-' 5AIDA POR AI'": 
GO TO 440 

510 IF AS="S" AND A\SA,2)=0 THE 
N PRINT "NAO EXISTE 3 AIDA A SUL” 

520 IF A$="E" AND A ÍSA,3) =0 THE 
M PRINT "NAO PODE PROSSEGUIR PAR 
R ESTE " : GO TO 4-4-0 
530 IF fi$ = ,i O ir AND fl<Sfl,4O=0 THE 
N PRINT “NRÜ PODE RTRRUESSRR PRR 


rwF 


EDES" : GO TO 4-4-0 
54-0 IF Q$ = "U" RND RíSR,5) -=0 THE 
N PRINT 11 NRÜ PODE SUBIR.POR ROUI 
11 : GO TO 4-4-0 

5*0 Ir R $ = 11 D ’ 1 RND R 5 ) =0 THr 

N PRINi ; 'NRÜ PÜDc DtzsCfcH PÜH ROU 

I 1 1 (3 1 j" ^ ^ ^ 

560 ÍF Rí = ri F" RND RND> . 7 THEN G 
ü TO £4-£0 

570 Jr R$ = ,, r :r THEN PRINT J, PRPR 
ONDE OUEk FUGIR? 1 ': GO TO 4-60 
530 IF R$ = ,, L'' RND Ri5Rí7)>-I TH 
EN PRINT M NflO HR- ROUI NINGUÉM C 
DM QUEM LUTRR" : GO J 0 4-4-0 
590 IF R$ = '■ I :t THEN GO SUB 3010: 


0 TO 24- 
570 Jr 

0NDE OU 
530 IF 
EN PR IN 
ÜM QUEM 
590 IF 
RETURN 
500 IF 

PRINT 


J / i 


I \ l II k 


11 NflO HR’ 


4 I 


i r v i + wl i 


AS=”C" AND COMIDA=0 THEN 


NAO 


EM COMIDA”: GO TO 
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. I, I 


4-0 

510 IP P$= J, G" ThEN GO SUB 2350: 
RETURN 

620 IP Rí = ,, L" THEN GO TO 733 
625 IP R$ = ,, H" THEN POR J=1 TÜ 3 
0: PRINT TflS NEXT J 

630 IF Rí = i, M M THEN LET SP=INT < 
RND*19)+1: IF SR =6 OR Sfl=ll THEN 
GO TO 630 

635 IP R4 = I, M" THEN GO TO 710 
640 IF R$ = "C" THEN GO SUB 24-60: 


635 IP 
640 IP 
RETURN 
650 IP 
1) 

660 IP 




GÜ TO 710 
GO SUB 24-60 


P í = 1 ' N'' THEN 


IP R$ = ,, S" THEN LE 


670 
3 i 

660 

4-) 

630 

51 


T SR=RíSfi, 
T 3 P = P Uz>Rj 


IP PÍ^E" THEN LET 5R=fllSfl, 


SR =R(SR ; 


R=R(SR; 


IP P$ = " O " THEN LE 


Pí = “ 


i;h 


HEN LE 


700 IF A*="D" THEN LET SR=A(SA, 
6) 

705 IF A$="R" THEN PRINT "A SUA 
SITUACAO E':"," PONTUACRO: “ ;3# 

RELATORIO+5*ÉNERGIfl+2*RIGUEZA+CO 

MIDA+30*MM 

706 Ir AND RND>.s THEN P 

RINT "MATOU MONSTROS ATE 

AGORA" 

710 RETURN 

720 REM * * * 4 * * -* * 4-4 ■¥■ + * -s 

' * r 1 1 1 * + ■■ #■ i ■ II Al ■■ v* m IP ■ 1 ir ti ■ h i i * ■ * i ' ' * 


0 


730 REM *CÜMBflTE* 
74-0 IP INKEYi í > " " 


HEN GÜ TO 


4 - 


N ü M R 


PDURP RUMENTR RS 
IDADES DE EXITO" 


750 PRINT " CARREGUE NUMR 

TECLA ■ " 

760 IF INKEYÍs"" THEN GO TÜ 760 
770 IP PATO =1 THEN PRINT J, A ARM 
ADURR AUMENTA AS SUAS POS- SIBIL 
IDADES DE EXITO": LET FF =3*INT ( 
FF/ 4-1 : GO SUB 3520 
730 CLS : FOR U=1 TO 6; PRINT M 

■i ■■ n * H n h ■■ ■■ Í# I 1 Ú i IA ■ Ir + é Jp 11 ^w^ ri Ú P III -II +h p+ I# 1+ I ■ n # ■■ n ■ ■■ ■■ 

Jf h t‘4EXT ü 

790 IF MACHADOa0 AND ESPADA=0 T 
HEN PRINT " UOCE NAO TEM ARMAS": 
PRINT "DEUE LUTAR DE MAOS NUAS" 


M E N 
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: LET FF = INT (FF+FF/5) : 60 TO 37 

0 

300 IF MACHADD=1 AND ESPADA=0 T 
HEN PRINT " UOCE TEM UM MACHADO" 

: LET FF =4.* INT. (FF/5) : GO TO 370 
310 IF MACHADO=0 AND ESPADA=1 T 
HEN PRINT "UAI' LUTAR COM A ESPAD 
A": LET FF=3*INT (FF/4-) : GO TO 3 
70 

320 INPUT “OUE ARMA QUER USAR ( 
1 -MACHADO J 2-ESPADA)? ";Z 

330 IF Z <1 OR Z>2 THEN GO TO 32 

0 

34-0 IF Z = 1 THEN LET FF=4-*INT (F 
F/5) 


350 IF 


=2 THEN LET FF =3*IN 


F/4.) 

360 REM ********************** 
870 REM *R LUTA* 

330 PRINT : PRINT 
390 IF RND >.5 THEN PRINT M$; " A 
TACA-O": GO TO 900 
395 PRINT "UOCE ATAC»" 

900 GO SUB 3520 

905 IF RND>.5 AND LUZ = 1 THEN PR 
INT "0 ARCHOTE CAIU-LHE DAS MAOS 
! ": LET LUZ =0: GO SUB 3520 

906 IF RND>.5 AND MACHADO=1 THE 
N PRINT “UOCE DEIXOU CAIR 0 MRCH 
ADO NO CALOR DA LUTA!": LET MA 
CHADO =0: LET FF=5*INT (FF/4-) 

907 IF RND/.S AND ESPRDA=1 THEN 
PRINT "A ESPADA FOI-LHE ARRANCA 

DA DAS MAOS í ": LET E5PADA=0: LE 

T FF =4.» TNT t* FF /FM 


.“l I J 


906 IF 
N PRINT 
PDü NO 
CHPDÜ =0 

907 IP 
PRINT 

DP DPS 


i ^ 


T FF =4.»INT (FF/3) 

910 IF RND >,5 THeN PhINT PRIN 
T "UOCc CONSEGUE FERI-LO" ; Lt i F 
F=INT ís#FF/ 6 ) 

911 IF RND>.95 THEN PRINT "AAAa 
aaaaarghi! 1 " GO SUB 3520: PRINT 

"ESTA ACERTOU-LHE EM CHEIO!" 

912 IF RND>.9 THEN PRINT "UOCE 
OUER FUGIR, MAS RESISTE Aü MEDO. 


913 IF RND>.9 THEN PRINT 
$« <SíJÍ##tt©$ÍK#/ÍK 

914. IF RND > . 7 THEN PRINT 

ESTA UMA LUTA DE MORTE?" 
915 IF RND >.7 THEN PRINT 


r j 


■i* fr */*/ 
cí: # =1 /r 




3ERP ■' 


0 5 0L 
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HO 


DO MONSTRO FflISCflM DE 


ODIO , 


t » 


913 IF RND>.7 THEN PRINT "DAS 5 
UR 5 GARRAS ESCORRE SANGUE!" 

917 IF RND > . 7 THEN PRINT "SENTE 
O CHEIRO fi ENXOFRE NO Hfi- LITO 

DO MONSTRO..." 

918 IF RND>.7 THEN PRINT "ELE G 
OLPEIA-O 3ELUATICAHENTE..." 

919 IF RND >.7 THEN PRINT "UOCE 

NUNCR ENCONTROU UM OPÜSITORTAO F 


920 60 SUB 3520 

930 IF RND>.5 THEN PRINT : PRIN 
T "O MONSTRO ATINGE-Ü!": LET ENE 
RGIA=ENER6IA-5 

94.0 IF RND >.35 THEN GO TO 390 
950 IF RND*16 >FF THEN PRINT : P 
RINT "E UOCE CONSEGUE HATAR O",M 
5: LET HM =MM +1: GO' TO 973 
960 PRINT : PRINT "O UEN 

CEU!": LET ENERGIA=INT (ENERGIA/ 


60 3US 3s20 : 


P RINT 


GO SUB 3520: RE 


970 LET AÍ3fi,7)=0: GO 3UB 3520: 
PRINT : PRINT : GO SUB 3520: RE 
TURN 

Q 3 0 OFH 

te te te I f h i # ■ I k I I ah M . M -* h ■ I wh ► > H i I ■ M 4i> I* IP ■ ■ 

990 REM *£>ESCRICRO DPS SflLftS* 
1000 PRINT : PRINT M *** ***** *** * 
S*****^*************''; PRINT : p 
RINT 

1010 FOR T =0 TO 13: IF Sfl=T + i TH 
EN 00 SUB 1030+T*60: RETURN 
102O NEXT T 

103O REM ******************** 
1O4-0 REM *5PLP 1* 

1O50 PRINT "UOCE E3TR'' NO flTRIO :i 


F Sfl=T+l TM 
RETURN 


1055 IF RND >4 4- THEN PRINT 


PÜ 


QUE 5E ESPALHA NO 


= i-i t 


NHA-SE OU 
DfcSDE HA 


■4INGUEM AQUI 


OLO .ADIUI 

PASSA 


DESDE HA ‘ MUITO!" 

1060 PRINT "EXISTE UMA PORTA A 

iJL" 

1070 PRINT "ATRAUES DE JANELAS 
NORTE CON- SEGUE UER 0 JARDIM 
AS DAMAS" 

1030 RETURN 

1090 REM ******************* 
1100 REM *3ALA 2* 


A 

D 
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1110 PRINT "ESTA' NA CAMARA DE A 

UDIENCIAS" 

1115 IF RND >.4- THEN PRINT "AS TA 
PECARIAS DAS PAREDES DAO UMA I 
DEIA DO ANTIGO ESPLENDOR DESTA 
SALA ..." 

1120 PRINT "EXISTE UMA JANELA A 
OESTE V 

1130 (SRINT "OLHANDO PARA A DIREI 
TA ATRAUES DELA CONSEGUE UER A 
ENTRADA DO CASTELO" 

1140 RETURN 

11&0 REH ***************** 

1160 REM «SALA 3* 

1170 PRINT "ESTA-' NUMA SALA GRAN 
DE; EM FORMADE L" 

1130 PRINT “EXISTEM DUAS PORTAS 
NESTA SALA" 

1190 PRINT "RS MADEIRAS DAS PARE 
DES ESTÃO GASTAS E ENCURUADAS. 

t í 


M f 


1195 IF RND>.4 THEN PRINT "OüUE 
0 RUIDO DE UM RATO ATRAS DE3I 1 R 
ODA SOBRE OS CALCANHARES... MAS N 
ADA UEI" 

1200 RETURN 

1210 OFM * * * 4. 44 4 4 + 4 — 4 * 4 * 4 4 * - * 

-■te F 1 I ■ tf I ■ f ■ I ■ J. ■ f « I I ia H I ■ +■ M Hl I 

1220 REM *SALA 4* 

1230 PRINT '-ESTA 1 ' NA SALA Dü CON 
SELHO PRIUA" 

1240 PRINT "-DO DO REI" 


M . 


I T J J l 'I ' t, I 

* L- L-* í 'i 


12 


* Ir RND ■; 4. THEN pPINt 


"0 ECO 
p IN D P 


A I 

n « * j 


SPIDH H s 


DPS PMTIGP3 DISCUSS0E5 PINDP 
PPRECE ENCHER P SPLP ,.*“ 

1250 PRINT "EXISTE UMP SPIDH P 5 

UL" 

1260 RETURN 

1270 REM 4- 4 -4 4-4 ^ * 4- 4 -4-4. .4 4 -4 4 4-4 4-4 

n te f P i F la I h ! ■ ia ah a\ H h i t ■ J I" I" I" I" I" ■ 

1230 PEM *SALA 5* 

1290 PRINT "ESTE ATRIO INTERIOR 
POSSUI UMA PORTA A NORTE E OUTR 
A A OESTE■" 

i300 - PRINt "ALEM DE UMA ESCADA C 
IRCULAR SUE ATRAUESSA UERTIC 

ALMENTE R SALA" 

1305 IF RND >.6 THEN PRINT "A SAL 
A E -' PESUENA , E DE3A6RADAUEL" 

1310 PRINT "UOCE UE UM LAGO ORNA 
MENTAL RTRAUE5 DAS JANELAS 


W I V l 
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R SUL" 

1320 RETURN 

1330 REM ^f.**.**.****-**.*-***-*-*.**.* 
134-0 REM *SALA 6* 


1350 PRINT "ESTA' NR ENTRADA DE 
UM CASTELO" 

1355 PRINT "EM PEDRA, DE APARENC 
IA TERP tufi" 

1360 PRINT " UOCE ENCONTRA-SE VIR 
ADO PARA" 

1370 PRINT ”ESTE“ 

1330 RETURN 

1390 REM * * ** *■ zx * * * * * * » * x » * 

■■ ■ I M " ■ t ■ f ■ ^ f ■ pf f p qq ^ j I ■ | 4 ■ ri |A Ah I ■ T^ -i* f | i 

14.00 REM *3ALA 7.» 

14.10 PRINT "UOCE ESTA NAS COZIN 
HAS DO CAS- TELO." 

14.20 PRINT "ATRAUES DE JANELAS N 
A PAREDE NORTE, CONSEGUE VER 

0 JARDIM DASDAMAS" 

14-30 PRINT "DESDE HA' MUITO QUE 
NENHUMA RE- FEICAO E' PREPARADA 
AOUI..," 

14-35 IF RND > ,4. THEN PRINT "...UM 
RATO CORRE NO SOALHO..." 


NTRADA D 


14-4-0 RETURN 

14-50 REM ******** *********** 

14-50 REM *SALA 3* 

14-70 PRINT "ENCONTRA-SE NA DESPE 
NSA, ENTRE" 

14-30 PRINT "ESPECIARIAS, VEGETAI 
5, MUITOS SACOS DE FARINHA E O 
UTRA5 PR0UI-S0E3" 

1490 PRINT "SENTE-SE NO AR O CHE 
IRO DAS ES-” 

1495 PRINT "PECIARIAS . ... " 

1500 RETURN 

1510 REM ******************** 

15= tf PFH * Q 3 x 

1530 PRINT‘"VOCÊ”ENTROU NO ElEVA 
DOR": GO SUE 3520 

1540 PRINT "ESTA' A DESCER LENTA 
MENTE" 


1545 GO 


1560 

1570 RcM ******************* 
1SS0 REM *SALA 10* 

1590 PRINT "UOCE ENCONTRA-SE 
VESTÍBULO TRASEIRO" 


GO SUB 3520 
LET SR=10 
GO TO 1000 
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1600 PRINT "EXISTEM JANELAS A SU 
L, DAS OUAISSE CONSEGUE VER O LA 
GO ORNAMEN- TAL" 

1610 PRINT "EXISTE UMA SAIDA PAR 


PRINT 


A LESTE E" 

1615 PRINT "OUTRA PARA NORTE" 
1620 RETURN 
1630 REM 

# T ti pi ■> li- i-F i# i i i-h li ■■ ■ r ■■ ii pi p ■■ p t m i* 

1640 REM *SALA 11* 

1650 REM 
1660 REM 
1670 REM 
1675 REM 
1530 RETURN 

1690 REM ** * * * * ** * ■* * 44 4- * * * 44 * ,4* 

T ■ ■ I ■ | | ^ p ^ ^ | ^ ^ f | I p | | ■ q ■ ■■ ■■ ■■ ^ ^ ■ i | ^ f r ^ ■ ■ 

1700 RÊM *5ALA 12* 

1710 PRINT "ESTA' NUMA MRSMORRA 
ESCURA E HÚMIDA" 

1720 PRINT "EXISTE UMA UNICA SAI 
DA, UMA" 

1730 PRINT "PEQUENA ABERTURA NA 
PAREDE A OESTE" 

1735 IF RND>.4 THEN PRINT "DE SU 

BITO OUVE-SE UM RUIDO SECO VINDO 
DA SALA DO uARCEREIRu ..." 

1740 RETURN 

1750 REM ******************** 
1760 REM *SALA 13* 

1770 PRINT "UOCE ESTA' NA SALA D 
O CARCEREI- RO, NOS SUBTERRÂNEOS 
DO CASTELO" 

1730 PRINT "A ESCADA TERMINA NES 
TA SALA" 

1790 PRINT "EXISTE AINDA UMA OUT 
RA SAIDA,' UMA ABERTURA VIRADA 
A ESTE" 

1795 PRINT "O AR E' HÚMIDO... SE 
NTE-SE UMA CORRENTE DE AR FRIO 
VINDA DAS FENDAS EXISTENTES NA 
PEDRA!” 

1300 RETURN 

1310 REM ******************* 

1320 REM *SALA 14* 

1330 PRINT "ENCONTRA-SE NOS APOS 
ENTOS DO REI, NO NIVEL SUPERI 
OR DO CAS- TELO" 

1340 PRINT "OLHANDO PARA BAIXO E 
PARA OCI- DENTE, ATRAVÉS DA JA 
NELA, PODE VER A ENTRADA DO CAS 


EXISTE AINDA UMA OUT 
UMA ABERTURA VIRADA 

O AR E' HÚMIDO... SE 
CORRENTE DE AR FRIO 
FENDAS EXISTENTES NA 
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TELO ; " 

1350 PRINT "E 0 JARDIM DP5 DAMAS 
E" UISIUEL DA JANELA A MORTE" 
1355 PRINT “EXISTEM PORTAS PARA 
tSTE E SUL" 

1360 RtTURN 

1370 RcM ********************* 
1330 PEM * S A L A 15* 

1300 PRINT "ESTA" NO RTRIO EM FQ 
RMR DE L" 

1395 Ir RND>,4 TMEN PRINT " . , - U 
MP BORBOLETR UOA JUNTO RO TECTQ 


j # 


1900 PRINT 


R NORTE ENCONTRA-SE 
E EXISTE AINDA UNA E 


■ h 

1 4 


R 


UMR PORTA, E EXISTE RINDR UMA E 
SCADA " 

1910 PRINT J: CONSEGUE-SE UER 0 LR 
GO DRS JANE -LAS UIRADAS P SUL" 
1920 RETURN 

1930 PEM ******************** 
194-0 PEM *3RLR 13* 

1950 pRINi "tSTfi SRLR FOI RNTIGR 
MENTE UshDh COMO SRLR DO TE SOUKÜ 


1955 IF PHD > - 4- THEN PPINT "UMR R 
RANHA DESCE PELR PAREDE--.' 1 
1950 PRINT :J NRO EXISTEM JRNELRSj 
APENAS" 

1970 PRINT "PORTAS" 

1930 RETURN 

1990 REM ******************** 
2000 RtzM ^SALA 17* 

2010 PRINT “OOOM. - * ESTA' NO RNT 
IGO QUARTO" 

2020 PRINT ”DRS CRIADAS" 

2025 PRINT "PARECE-LHE SENTIR RI 
MDA UM LEUE CHEIRO R PERFUME- - -" 
2030 PRINT "tXISTE UMR SAIDR PRR 
A OESTE E UMR PORTA PARA SUL" 
2040 RETURN 

2050 Pí;M 4-* 4-4- * « 4.4 *4.^*:* JÇ. * 4-4- 

■ 1 ■ ■■ I P II -P h -PP -PI- ff II r -1 I ■ ifc *k + * lí TI HF ■ 

2050 PEM ^SRLR 13* 

2070 PRINT" "ESTA~PEQUENA SRLR DO 
PISO SUPE- PIOR ER SRLR DE UE 
ST IR " 

2030 PRINT "EXISTE UMR JANELA PR 
RR NORTE, DE ONDE E " P0S5IUEL 


UER 0 JRRDIMMAIS ABAIXO" 

2090 PRINT "EXISTE RINDR UMR POR 


JRRDIMMAIS ABAIXO" 
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TR R SUL" 

2095 PRINT "UOOE UE R SUA PRGPR 
R IMAGEM NUMESPELHO - NR SUA FR 
E flDIUINHA- -SE 0 MEDO , . , ,r 
2100 RETURN 

2110 RtM ************ ^** +^**^4. 
2120 REM *SALA 19* 

2130 PRINT "UOCE ENTROU NUMA PE 


2230 

2290 

2300 

2310 

2320 

2330 

2340 

2350 

2360 


H O Li i 


i=TÍ30 PRINT 11 U0CE ENTROU NUMA 
UENA SRLR" 

2140 PRINT "FORA DO CASTELO" 

2150 PRINT "PODE UER 0 LRGO ATR 
UES DRS JR-" 

2150 PRINT "NELAS UIRADAS R 5 
2230 RETURN 

2290 Rt:M ******************* 
2300 REM * MORTE* 

2310 PRINT "UGCE MORREU..." 

2320 GO 5UB 3520 
2330 GO TO 120 

2340 PEM ******************** 

2350 REM fcSUARDAR RIQUEZAS* 

2360 IF A USA, 7) <10 THEN fRINi 

RO EXISTE AQUI NENHUM TESOURO 
GO SUB 3520- P ET Lí P M 


t-i 


UO SUB -JS20: RETURN 
2370 IF LUZ =0 THEN PRINT "MAS E 
TA" ESCURO E UOCE NADA UE": GO 
UB 3520: RETURN 
2330 LET RIQUEZA=RIQUEZA+A(SR 
2390 LET R(5A,7)=0 
2400 RETURN 

2410 REM ******************* 


; f 


f ■ i ri 




2420 REM *TENTRTIUR 
EXITO* 

2430 PRINT "NRO, DE 


F U G R 5 E M 


TflR " 
2440 
2450 
2460 
2470 
24é0 
2490 
2500 
2510 


NRO; DEUE.FICAR E LU 


LET A$="L" 

GO SUB 3520 
GO TO 590 

^ 1 * ^ * 1 II 1 II P % 4 f 1 # ri J- J l I p ■ ■ 

REM *ÜÜM£R* 

C L 5 

IF COMIDA<1 THEN RETURN 


PR IN 


TEM 


; COMIDA; " UNIDA 


DES DE COMIDA" 

2520 PRINT "QUANTAS OUER INGERIR 


2530 INPUT Z 

2540 IF Z >COMIDA THEN GO TO 2530 
2550 LET COMIDA aINT ÍCOMIDA-Z) 
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HO Q Q'. : Z t.ó '.O 









560 LET ENERGIR=INT íENERGIR+5* 


570 

530 


2600 

2610 

2620 

) 

2630 


GO SUB 
RETURN 


3520 


CLS 


REH 

REM 


******************* 
*INICIRL IZRR* 


LET ENERGIR=60+INT ÍRND*100 


LET RIQUEZA =30 + INT (RND*i00 


264-0 LET 


2660 L 
NSTROS 
2670 R 


2690 

2700 

2710 

2720 

2730 

274-0 

2750 


LET COMIDR =0 

LET RELRTORIQ =0 

LET MM =0: REM *NUMERO DE MO 

S MORTOS* 

RPM 

■ ¥ PI ú i Íl # h . + m í . - l\ l\ A I ■ f ■ ! * ■ h II * ■ ■ * ■■ ■ ■ 

REM *DEFINIR CASTELO* 

DIM A(19,7) 

FOR 5=1 TO 19 
FOR C=1 TO 7 
REAP R í B ,C) 

NEXT C 
NEXT B 

INPUT IJ OURL £ '■ O SEU NOME, 

RAPOR7 ”;N$ 


EXPLORADOR? " 
2760 CLS 
2770 LET SR =6 
IAL (SR =N. PA 


2770 LET SA =6: REM *POSICAO INIC 
IAL ÍSflaN. PA SALA)* 

2730 LET ESPADA =0 
2790 LET AMULETO=0 
2300 LET MACHADO=0 
2310 LET FATO=0 
2320 LET LUZ =0 

2330 REM ******************** 
234-0 REM *DISTRIBUIR TESOURO* 
2350 FOR J=1 TO 4 
2360 LET M=INT ÍRND*19)+1 
2370 IF M =6 OR M = ll OR A(M,7)<>0 
THEN GO TO 2360 

2330 LET A(M,7)=INT (AND*100)+10 
2390 NEXT J 

2900 RtM ******************** 
2910 REM *DISTRIBUIR MONSTROS* 
2920 FOR J=1 TO 6 
2930 LET M=INT (RND*18)+1 
294-0 IF M =6 OR M = ll OR A iM, 7)00 
THEN GO TO 2930 
2950 LET A ÍM,7) =-U 
2960 NEXT J 


2730 

2790 

2300 

2310 


330 REM 
340 REM 
350 FOR 
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2970 LET R(4,7)=100+INT (RND*!00 

) 

2930 LET A(16,7)=100+INT ÍRND*10 
0 ) 

2990 RETURN 

3000 REH ******************** 
3010 REM *INUENTARIQ/PROVISÕES* 
3020 PRINT 'PROUISOES & IHVEHTPP. 
IO' 1 

3030 GO SUB 3260 

3040 IF RIQUEZAí.l THEN LET Z=0: 
GO TO 3137 

3050 PRINT "UpCE PODE COMPRAR: 

1 - ARCHOTE (415 

) " 

3060 PRINT " 2 - MACHADO (410 

) M 

3070 PRINT “ 3 - ESPADA (420) 

r t 

30S0 PRINT “ 4. - ALIMENTOS í$ 

2/UNIDADE)” 

3090 PRINT " 5 - AMULETO MAGI 

CO ($30)“ 

3100 PRINT " D - ARMADURA ($5 
0 ) " 

3110 PRINT " 0 - CONTINUAR AU 

ENTURA” 

3131 IF LUZ=1 THEN PRINT "UOCE T 
EM UM ARCHOTE" 

3132 IF MACHADO=1 THEN PRINT "0 
SEU EQUIPAMENTO INCLUI UM MA- CH 
ADO" 

3133 IF ESPADA=1 THEN PRINT "GUA 
RDE SEM A SUA ESPADA" 

3134. IF AMULETO =1 THEN PRINT "0 
SEU AMULETO AJUDR-LO-A EM MO-ME 

hlTnS DTFTfFTS " 

3135 IF FATO=Í’tHEN PRINT "A ARM 
ADURA FICA-LHE BEM..." 

3138 INPUT "NUMERO DA OPC-AO? "; Z 

3137 IF Z =0 THEN CLS : RETURN 

314-0 IF Z = 1 THEN LET LUZ = 1: LET 

RIQUEZA=RIOUEZA-15 

3150 IF Z =2 THEN LET MACHADO=1: 

LET RIQU£ZA=RIQUEZA-10 

3160 IF Z=3 THEN LET ESPADA=1. L 

ET RIQUEZA=RIQUEZA-20 

3170 IF Z =5 THEN LET AMULETÜ = 1: 

LET RIQUEZAsRIQUEZA-30 




3130 IF Z =6 THEN LET FAT0=1: LET 
RIOUEZA=RI0UEZA-50 
3190 IF RIOUEZA<0 THEN PRINT "TE 
NTOU ENGANAR-ME!": LET RI0UEZA=0 
: LET FATO=0: LET LUZ=0: LET ESP 
ADA=0: LET AMULETO=0: LET COMIDA 
= INT (COMIDA/4.:* : GO SUS 3520 
3200 IF Z<>4 THEN GO TO 3030 
3210 INPUT "QUANTAS UNIDADES? "; 
O: LET Q=INT ÍO) 

3220 IF 2*0 /RIOUEZA THEN PRINT " 
NAO TEM DINHEIRO SUFICIENTE": GO 
TO 3210 

3230 LET C0MIDA=C0MIDA+0 
324.0 LET RIOUEZA =RI0UEZA-2*Q 
3250 GO TO 3030 

3260 IF RIOUEZA>0 THEN PRINT : P 
RINT : PRINT "UOCE TEM í";RIOUEZ 
A 

3270 IF RIOUEZA=0 THEN PRINT "NA 
0 TEM DINHEIRO": GO SUB 3520: RE 
TURN 

3230 FOR J=1 TO 4-: PRINT : NEXT 


L-’ H T H ; 0 .1 ÍT 1 2 , 0 , 0 / 0 


0 i 1 


0 , 0 , 


0 . 0,0 


4- 


J 


S j 3,15,13 


J 

3290 RETURN 
3300 REM 

3310 DATA 0,2,0,0,0,0,0: REM 
R 1 

3320 DATA 1,3,3,0,0,0,0 
A 2 

3 o --'0 l-'HTH ic£ , 0 i p.. 2, 0 ,0,0 

fl 3 

4*0 -'HTH 0 , S ; 0,0 , tí 0,0 
R 4 ’ 

1 ^ 0 D HTH 4- , 0,0 .. 3,15 ,13 

AL R 5 

■-? w* t* 0 L-' R ?“! 0,0; 1,0,0,0,0 

H 6 

3370 DhTR 0 , £>, 0 0,0,0,0 

R 7 • 

3330 DA • A / , 10,0,0 .. 0,0 , 

LR 3 

3390 DATA 0,19,0,3,0,3, 

LR y 

34.00 DRTR 3,0,11,0,0,0, 

LR 10 

3 a. 10 D A i A 0,0,10/0,0,0 , 

LR 11 

34-20 DRTR 0/0,0,13,0,0, 




REM 5RI¬ 


REM 5 R L 
REM SAL 

p F M " 

■ ■ J Hm 


'T i"* 

,i tf : ; tf ■ 


rx 

t» j 


,0.0, 


0 , 0,0 


iTi 

L' L , tf ^ tf 


1 J 


1 A 


J i 


10,0,0/0 


ti / t 


REM 5 Ri 
K E M 3 R i 


REM 5R 


0 . 19 , 0 / 3 / 0 / 3/0 

3/0/11/0:0/0,0 


REM 5 




R 




5fl 


f } tf ,j -L ' 1 L 1 / tf > 


0,0 


0/0,0/ 1 3,0 j 0 , 0 


I l 

n. 


R 


M 5R 


M 
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hui i 


REM 5 


REM 3 


REM 5 


13,16,0,1 


0 / 0 : 


■ I ^ T 

r\ i 


34-30 _ DA T P 0/0/12/0,5,0,0 REM 
LR 13 

34.4.0 DRTR 0/15/17/0,0/0,0: REM 

RLR 14- _ 

34-50 DRTR 14-, 0 / 0,0,0,5 / 0 : RtM 

LA 15 

34.60 DRTR 17/0/19/0,0/0,0: REM 

fiLn Ib _ 

34-70 DPTR 13 / 16,0,14- .0,0,0: WC 

5RLR 17 __ t . 

34-30 DRTR 0,17/0,0/0,0,0: Hth 

Lfl lí 

34-90 DRTR 9,0.16,0,0,0,0: REM 

LR 19 
3500 HfcM 

3510 REM *AJUSTE 0 RTRR50 RO 3 
GOSTO* 

3520 FOR T = 1 TO 900: NtXT T 
3530 RETURN 




0/17,0,0,0,0,0 
9,0.16,0,0,0,0 


RtM 3 A 
REM 5R 


3510 REM ■* AJUSTE 


F? i 
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XVI 


NOS CONFINS DO ESPAÇO 


O leitor dispõe já de um ou dois programas de aventuras que 
funcionam suficientemente bem. Mas tem ainda outra coisa, se 
bem que talvez não tenha dado por isso: uma estrutura base que 
lhe permitirá criar as suas próprias aventuras. 

Em vez dc ter novamente todo o trabalho de começar pelo 
princípio, bastar-lhe-á modificar o programa que já dispõe para 
obter uma nova aventura, completamente nova e original. As 
declarações DATA definirão o mapa, e as instruções PRINT que 
definem as salas serão as principais a modificar. 

No entanto, como o leitor certamente gostará de saber, o resto 
do programa, que define o mecanismo principal da aventura, 
pode ser deixado praticamente na mesma. 

Para demonstrar o grau de eficácia que se pode conseguir com 
este processo de “criaçào/modificação", decidi partir da pri¬ 
meira versão de “Os Lobisomens e o Aventureiro" (não da ver¬ 
são mais elaborada) e transformá-la num programa de aventuras 
nos confins do espaço. O cenário é o seguinte: o transporte inter- 
galático, matriculado sob o nome “Isaac Asimov” sofreu um 
desastre inexplicável quando se dirigia com 1000 passageiros pa¬ 
ra os planetas do Sistema Seuxariano. 

Ao executar a sua missão regular de patrulha na vastidão do 
espaço, duzentos anos mais tarde, o meu caro leitor encontra o 
casco à deriva da Isaac Asimov. Decide explorar o que resta da 
nave, tentando descobrir o que terá acontecido. No entanto, as¬ 
sim que penetra no seu interior apercebe-se de que a sua própria 
nave de patrulha, que deixou perto do transporte, explode subi¬ 
tamente. É agora forçado a descobrir um vaivém de socorro em 
bom estado a bordo da Isaac Asimov, ou a morrer no caso con¬ 
trário. 

Nesta aventura, o leitor explora a nave destruída, luta com an- 
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dróides e seres alienígenos, e enfrenta alguns outros problemas 
que lhe explicarei depois de ter jogado. 

Não apresentarei imediatamenie o mapa (e espero que o leitor 
não lente consultá-lo mais adiante) porque neste momento já se¬ 
rá capaz de deduzir facilmente o mapa em que o jogo se baseia. 

Existem várias armadilhas nesta nova aventura, que tornam 
relativamente difícil a sua resolução, mas o leitor apreciará cer¬ 
tamente as dificuldades. 

Vejamos um exemplo de execução do programa “O Desastre 
Asimoviano”: 


OURL £•' 0 SEU NOME, COMANDANTE? 
ANDREU 


COtiRmmTE ANDREU , 

R SUA tNERGJ.fi E ■' 76 
TEM 52 CREDITÜ.S SOLARES 
05 5EU5 DEPÜSIT05 DE RSSERUA 
CONTEM 1 UNIDADES DE OXIGÊNIO 
ESTA DEMfiSIflDÜ ESCURO PfiRfi UER 
ENCONTRfi AOUI $103 CREDITO* 


QUE DESEJA PA2ER? 


APARECEU UM ANDROIDE DE ABASTE- 
C IMtNT 0 


UOCE TEM 52 CRÉDITOS 


UwCE PODE COMPRAR; 

1 - LANTERNA NUCLEONICA ÍÍ15) 

2 - PISTOLA IONICA C$10) 
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3 - LASER ($20) 

4 - OXIGÊNIO \ $2/UNIDADE) 

5 - TRANSPORTADOR DE MATÉRIA 

■' *30; 

5 - PATO DE COMBATE ($50) 

0 - CONTINUAR AUENTURA 


QUAL 0 NUMERO DA OPCAO? i 


UOCE TEM 4-7 CRÉDITOS 


UOCE PODc COMPRAR: 

1 - LANTERNA NUCLEONICA C$15 

2 - PISTOLA IONICA í*10) 

^ - S í ipffli 

4 - OXIGÊNIO Ç $2/UNIDADE) 

5 - TRANSPORTADOR DE MATÉRIA 

í $30) 

5 - PATO DE COMBATE (450) 

0 - CONTINUAR AUENTURA 


OUAL 0 NUMERO DA OPCAO? 3 


COMANDANTE A ND REU, 

A 5UA ENERGIA E' 71 
TEM 7 CRÉDITOS SOLARES 
OS SEUS DEPOSITOS DE RESERUA 
CONTEM 11 UNIDADES DE OXIGÊNIO 
TRAZ CONSIGO 
UM LASER 





UOCE ENCONTRA-SE NO INTERIOR DA 
NAUE DESTRUÍDA. 

UE DESTROÇOS POR TODO O LflDO, 
COMO SE TIUE5SE HRUIDO UMR TER- 
RIUEL EXPLOSÃO Hfl' MUITOS E0N3 
ENCONTRA AQUI *183 CRÉDITOS 


QUE DESEJA FAZER? 


COMANDANTE RNDREU, 

A SUA ENERGIA E' 66 
TEM 7 CRÉDITOS SOLARES 
OS SEUS DEPOSITOS DE RESERUA 
CONTEM 11 UNIDADES DE OXIGÊNIO 
TRAZ CONSIGO 
UM LASER 




ENCONTRA-SE NOS AQUARTELAMENTOS 
DA TRIPULACAO 


CUIDADO! HA’' AQUI PERIGO! 


E-' UM ALIENIGENO SORRIDENTE 

OS INDICADORES DE PERIGC REGIS¬ 
TAM 20 UNIDADES!! 
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QUE DcSEJA FAZER? 



^ Tr II- H V ■ è * ++ 

■ > ■ 4 1 ¥ 1+ ^ L I à f 1 ■ r ■■ 1 m ■■ m ^ a I ar ^ f ^ m mi 44 1 ■ ^ ■■ 1 ^ I F 1 1 O ► ■ ^ í ^ ^ 1 ^ ^ ^ 1 ' * ♦ * 

I I f 1 d t ^ f ^ ah ■ i ■ H r 4 | i q a qi aa ^a ^ ^ aA ^ A ^ A II 1^ IP IV l H | I VI l*P PP f P J " V J 1 ^ ^ 

* üf * * + + + 

^ ij_ r'ja jjp ^ ^ ^ ^ ^ ^ ^ 


uai usar o 


EU LASER 


UOCE ATACA 
UOCE ATACA 

UOCE CONSEGUE FERI-LO 

0 INIMIGO ATINGE-D! 
UOCE ATACA 

UOCE CONSEGUE FERI-LO 

0 INIMIGO ATINGE-0 ! 
UOCE ATACA 


0 INIMIGO ATINGE-0 í 

E UOCE CONSEGUE MATAR 0 
ALIENIGENO SORRIDENTE 
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XVII 


LISTAGEM DE “O DESASTRE ASIMOVIANO” 


Não esqueça que este programa se baseia na primeira versão, 
não desenvolvida, de “Os Lobisomens e o Aventureiro”. Não 
foi renumerada, pelo que o leitor poderá simplesmente carregar 
na máquina o primeiro programa e alterá-lo onde necessário — 
secção por secção — para criar este novo programa. 

Note que em todos os casos COMIDA passou A OXI, MA¬ 
CHADO passou a IAO, ESPADA alterou-se para LASER e 
AMULETO passou a TRANSPORTADOR. Foi acrescentado 
ao vocabulário a ordem “B’\ relacionada com o consumo de 
oxigénio. 


10 REM 


Q DESASTRE ASIMOUIANO 


20 GO SUB 2600: REM * INICÍAL lZ 
RR* 

00 GO SUB 150 

3 s I r íH - iu’ T H ^ N L. t T y 0 = 0 O + 1 : 
IF 00=6 THEN GO TO 1370 

4-0 GO TO 30 
150 RrM ^ + 

■■ F | • ■ i i qi 4 ■ J ■ ■■ ■ ■ ■ L b b b h b h ■% l 4 ■■ j m |b l ■ ■ B 

160 REM *ROTINA PRINCIPAL* 

17Õ LET ENERGIA=ENERGIA-5 
1S0 Ir ENERGIA<10 THEN PRINT "C 
UIDADO COMANDANTE ; N4 / "NECESSIT 
A DE OXIGÊNIO!": PRINT 
190 IF ENcRGIA<l THcN GO TO 230 
0: REM *MORTE* 

200 LtT RELATOR10=RtLATOR 10 + 1 
210 PRINT "COMANDANTE "iNt;' 1 /" 
"A 5UA EMfcRGIA t *' ";ENcRGIR 

220 IF RIQUEZA>0 THEN PRINT "TE 
M RIQUEZA;" CRÉDITOS SOLARES" 
230 IF OXI>0 THEN PRINT "OS SEU 
S DEPOSITOS DE RESERUA CONTEM 
";OXI; M UNIDADES DE OXIGÊNIO" 
24-0 IF FATO = 1 THEN PRINT "ESTA" 
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1 


A USAR FATO DE COMBATE" 

250 IP IAÜ=Q AND LASER=0 AND TR 
ANS =0 THEN >30 TO 320 
260 PRINT "TRAZ CONSIGO " 

270 IP IA0=1 THEN PRINT "UMA PI 
STOLR IONICA" 

280 IP LA5ER=1 THEN PRINT "UM L 
ASER " 

290 IP LASER + IAO >0 AND TRANS=1 
THEN PRINT "E "i 
300 IP TRANS =1 THEN PRINT "0 TR 
ANSPORTADOR DE MATÉRIA" 

310 PRINT 

320 IP LUZ=0 THEN PRINT "ESTA'' 
DEMASIADO ESCURO PARA UER" 

330 IF LUZ=i THEN GO SUB 990: R 
EM #DE5CRICA0 DA "oALA# 

340 LET K=A<SA,7): REM #K DEPIN 
E CONTEÚDO DA SALA# 

350 IP K=0 THEN GO TO 440: REM 
#SALA UAZIA# 

360 IP K >9 THEN PRINT "ENCONTRA 
AQUI í";K;" CRÉDITOS": GO TO 44 

0 

370 PRINT,: PRINT : PRINT "CUID 
ADO! HA' AQUI PERIGO!": GO SUB 3 
520 

330 IP K=-i THEN LET Mí="GUERRE 
IRO ANDROIDE": LET FF =5 
390 IP Ks-2 THEN LET MÍ=”DEL-FI 
EUIANO AUARIADO”: LET PF=10 
400 IF K = -3 THEN LET MÍ="ROBOT 
RASTEJANTE": LET FF=15 
410 IF K=-4 THEN LET. MÍ="RLIENI 
GENO SORRIDENTE": LET FF=20 
420 PRINT : PRINT "E' UM ";MÍ 
430 PRINT : PRINT "OS INDICADOR 
ES DE PERIGO REGIS- TAM "; FF; " U 
NIDADES!!" 

440 GO SUB 3520 

450 PRINT : PRINT : PRINT "QUE 
DESEJA FAZER? " 

460 INPUT Aí: LET Aí=Aí< TO 1) 
470 IF K <0 AND Aí;>“L" AND Aí o 
"F" THEN GO TO 460 
430 PRINT : PRINT : PRINT "- 

-; p 

RINT 

490 IF Ai="9" THEN GO TO 1370 






I 

4 

f 

I 

i 


500 IF Aí="N" AND AÍSA,1)=0 THE 
N PRINT "NAO HA' SAIDA POR AI'": 

GO TO 440 

510 IP Rí="S" AND A <SR,2) =0 THE 
N PRINT "NAO EXISTE SAIDA A SUL” 
: GO TO 440 

520 IF A$="E" AND AÍSA,3)=0 THE 
N PRINT "NAO PODE PROSSEGUIR PAR 
A ESTE": GO TO 440 

530 IP A$="0" AND AÍSR,4)=0 THE 
N PRINT "NAO PODE ATRAUE53AR PAR 


EDES": GO TO 440 

540 IF A$="U" AND AlSA,5)=0 THE 
N PRINT "NAO PODE SUBIR POR AQUI 
": GO TO 440 

550 IP Aí="D" AND AÍ5A,6>=0 THE 
N PRINT "NAO PODE DESCER POR AQU 
I": GO TO 440 

560 IF Aí = "F" AND RND >.7 THEN G 
n XO 24-20 

”570 IF Aí="F” THEN PRINT "PARA 
ONDE QUER FUGIR?": GO TO 460 

530 IF Aí="L" AND A(SA,7)>-1 TH 
EN PRINT "NAO HA' AQUI NINGUÉM C 
OM QUEM LUTAR": GO TO 440 

590 IF A$="I" THEN GO SUB 3010: 

RETURN 

600 IF Aí="C" AND 0X1=0 THEN PR 
INT "NAO TEM OXIGÊNIO": GO TO 44 
0 

610 IF Aí="G" THEN GO SUB 2350: 

RETURN 

620 IF Aí ="L" THEN GO TO 730 

630 IF Aí="M" THEN LET SA=INT ( 
RND#19)+1: IF SA=6 OR SR=11 THEN 


GO TO 630 
635 IF Aí="M" 
640 IF A$="C" 
RETURN 

650 IF AÍ="N" 
1 ) 

660 IF Aí = ”5" 
2 ) 

670 IP Aí="E" 

3 > 

630 IP Aí ="0" 

4) 

690 IF Aí="U" 
5' 


THEN 

THEN 

GO TO 710 

GO SUB 2430: 

THEN 

LET 


THEN 

LET 


THEN 

LET 


THEN 

LET 

5H=H (5i=Í , 

THEN 

LET 

*5fl=R í 5fl j 
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700 

6 ) 

710 

720 


IF = n D Jl THEN LET 


710 RETURN 

720 RcM ******************** 

730 REM *COhBRTE* 

74-8 IF INKEY $ < > " " THEN GO TO 74. 

0 

7S0 PRINT '* CARREGUE NUMR 

TECLA ■ " 

760 ÍF INKEYJ = '*" THEN GO TO 760 
770 IF FATO=l THEN PRINT ”0 FAT 
0 DE COMBATE AUMENTA 0 SEU INDIC 
E DE 30BREUIUENCIA": LET FF =3*IN 
T (FF/4-) : GO SUB 3520 
730 CLS : FOR J=1 TO 6: PRINT " 

******************************** 
": NEXT U 

735 PRINT 

_ 790 IF IAO =0 AND LASER=0 THEN P 
KlNT “ UOCE NAO TEM ARMAS": PRIN 
T "DEUE LUTAR DE MAOS NUAS”: LET 
FF=INT (FF+FF/5): GO TO 370 
300 IF IA0 = 1 AND LASER=0 THEN P 
RINT "UOCE TEM UMA PISTOLA IONIC 

A": LET FF=4-*INT (FF/5): GO TO 3 
70 

_310 IF IAO=0 AND LASER=1 THEN P 
KlNT "UAI USAR 0 SEU LASER": LET 
FF=3*INT (FF/4.) : GO TO 870 
320 INPUT "OUE ARMA SUER USAR ( 
1-PISTOLA; 2-LASER)? ";Z 
330 IF Z<1 OR Z >2 THEN GO TO 32 


► 

L 


S20 INPUT 
1-PISTOLh; 


330 

0 

34-0 

F/5) 


IF 


< 1 


_ A 


i-í; 


350 IF 


F/4.) 

360 

370 

330 

390 

í; " 

395 


THEN LET FF=4-*INT 
THEN LET FF=3*INT 


V 1 


REM A-****************.**** 
REM *A LUTA* 

PRINT : PRINT 
IF RND >.5 THEN PRINT "0 " 
ATACA-O": GO TO 900 


"0 


; m 


39s PRINT "UOCE ATACA" 
900 GO SUB 3520 
910 IF RND>.5 THEN PRINT 
T "UOCE CONSEGUE FERI-LO” 
F=INT (5*FF/6) 

920 GO SUB 3520 

330 IF RND>.5 THEN PRINT 


PR IN 


PR IN 
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T "0 INIMIGO ATINGE-0 !": LET ENE 
RGIA=ENER6IA-5 

94-0 IF RND >.35 THEN GO TO 330 
350 IF RND*16> FF THEN PRINT ; p 
RINT "E UOCE CONSEGUE MATAR 0",M 
S: LET MM =MM +1: GO TO 970 
960 PRINT : PRINT "0 ";MS'"FERE 
-0 GRAUEMENTE!”: LET ENERGIA=INT 

(ENERGIA/2) 

970 LET A(SAj7)=0; GO SUB 3520: 
PRINT : PRINT : GO SUB 3520. RE 
TURN 

930 REM ******************* 

990 REM *DESCRICAO DAS SALAS* 
1000 PRINT : PRINT "************ 

********************": PRINT P 
RINT 

1010 FOR T =0 TO 13: IF SA=T + 1 TH 
EN GO SUB 1030+T*60: RETURN 
1020 NEXT T 

1030 REM ******************** 
104-0 REM *SALA 1* 

1050 PRINT "UOCE ESTA' NO ANTIGO 
CENTRO DE" 

1060 PRINT "RECREACAO" 

1070 PRINT "UE EOUIPAMENTO DE TR 
EINO EM GRA-" 

1075 PRINT "UIDADE ZERO ESPALHAD 
0 PELA AREA" 

1030 RETURN 


** 

P 

TH 


GO 


1090 REM ******************* 

1100 REM *SALA 2* 

1110 PRINT "ESTA'' NAS OFICINAS D 
A NAUE" 

1120 PRINT "50 PODE ABANDONAR 0 
LOCAL ATRA—" 

1125 PRINT "UES DA GIGANTESCA PO 
RTA DO HAN-" 

1130 PRINT "GAR, A OESTE" 

114.0 RETURN 

1150 REM ***************** 

1160 REM *SALA 3* 

1170 PRINT "UOCE ENCONTRA-SE NO 
INTERIOR DA NAUE DESTRUÍDA." 

1130 PRINT "UE DESTROÇOS POR TOD 
0 0 LADO/' 

1190 PRINT "COMO SE TIUE5SE HAUI 
DO UMA TER-" 


1195 PRINT "RIUEL EXPLOSÃO HA 
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UITOS EONS" 

1200 RETURN 

1210 REM * * * $ * $ * * * * * * * # * * * 4. ^ <$■ 
1220 REM *SALA 4.* 

1230 IF RND>.S THEN PRINT “Oü 


?-iI 


u 


i 


» » 


H UISflü QUE 


E TEM D 


124-0 PRINT "h UISflü QUE SE TEM D 
RS ESTRELRS" 

Í'è^~ PR1UT "NE5TR PLRTRPORMR DE 
OEsERURCRO E -' MAGNIFICA , , , " 

1250 PRINT 11 SO PODE SRIR POR OND 
E ENTROU*' 

1260 RETURN 

1270 REM ** ******** * ********* 
1260 REM *3ALA 5* 

1290 PRINT "'A SUR FRENTE ESTEND 
EM-dE RORES DE CULTURRS HIDROPON 


1290 PRINT M 'fl 
EM-SE RORES DE 

ICRS " 

1300 PRINT "EM 

ALIMENTAUA OS 

R NRUE" 

1305 IF RND>.5 
MPRDRS SOLRRES 

St ,T 

1310 IF RND > # 5 


TEMPO 
MIL P 


E 


TR RRER 
GEIROS D 


THEN PRINT "RS LR 
ESTRO RINDR RCESR 


THEN PRINT "ALGUM 


UPJRS 


*- ' 


fls PLANTAS PARECEM RINDR UlOflS 
R ESTE” 

1320 RETURN 

2-330 REM ******************** 

134.0 REM *SALfl 5* 

1350 PRINT "UOCE ESTA' LIURE 1 " 
2-355 PRINT “CONSEGUIU ESCAPAR! " 
1360 PRINT “O URIUEM RFRSTR-SE D 

1370 PRINT "fl SUR PÜNTUflCflÜ E'■ 

i 3*RELAT0RI0+5*ENERGIA+2*RI0UEZ 

fl+10*OXI+30*MM 

1380 STOP 

2??® 5SÍ 1 ****************** 

14.00 REM *SRLR 7* 

l^l. 0 "ENCONTRA-SE NOS ROUR 

RTELRMENTOS DR TRIPULflCflO” 

1 4 Í® IP ?Ü D> * 5 THEN PRINT "GRRND 
|„ PflRTE 005 BELICHES ESTRO UAZIO 

1*25 I F PND > . 5 THEN PRINT "OS PO 

y c 2ã 7iÇ I Ç2 LfiNTES 0UE Restrmmrnte 

M-SE NO SEU SONO SEM FIM" • 

14.30 IF RND> . 7 THEN PRINT "EXIST 
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EM SRIDAS fl NORTE, ESTE E OESTE 

I I 

14-4-0 RETURN 

14-50 REM ******************* 

14-50 REM *SRLR S* 

14-70 PRINT "ESTR- NO CENTRO DE fl 
NIMRCRO SUSPENSA..." 

14-30.IF RND >.5 THÊN PRINT "OS CO 
RPOS DOS PASSAGEIROS FLU- TUfiM 
LIUREMENTE..." 

14.35 IF RND> .5 THEN PRINT "O DOR 
MITORIO E' ENORME, PARECE NRO T 
ER FIM..." 

1490 IF RND>.9 THEN PRINT "SO' 1 E 
XISTEM SflIDflS fl OESTE E fl SUL" 
1500 RETURN 

1510 REM ******************** 
1520 REM *SflLfl 9* 

1530 PRINT "UOCE ENTROU NO HOSPI 
TAL Dfl NflUE,BRANCO E ESTERILIZflD 

O" 

154-0 PRINT "OUUE, UINDO DE SUL, 
UM SÚM ES-" 

154.5 PRINT "TRIDENTE, flCOMPANHflD 
O DE UMfl SENSflCflO DE CALOR” 
1550 PRINT "DE NORTE PARECE UIR 
FRIO" 

1560 RETURN 

1570 REM ******************* 

1530 REM *SALA 10* 

1590 PRINT "A COMIDA Dfl TRIPULAC 
AO ERA PRE- PARADA A0UI" 

1500 PRINT ”05 RESTOS DA ULTIMA 
REFEIÇÃO PO-DEM AINDA SER UISTOS 

I i 

1610 PRINT "EXISTE UMA SAIDA PAR 
A SUL, E" 

1615 PRINT "OUTRA PARA OESTE" 
1620 RETURN 

1630 REM ******************** 
154-0 REM *SALA 11* 

1650 PRINT "AMA! PARECE 0 UAIUEM 
ESPACIAL 1 " 

1655 PRINT "OS INSTRUMENTOS PARE 
CEM INDICAR” 

1660 PRINT "OUE A PEQUENA NAUE S 
E ENCONTRA" 

1670 PRINT "EM PERFEITAS CONDICO 
ES! " 
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1630 

1590 


RETURN 

REM ******************** 


1700 REM *SALA 12* 

1710 IF RND > . 5 THEN PRINT "ESTA' 
NR SALA DE NAUEGRCAO" 

1720 PRINT "UEEM-SE ESTRANHAS MA 
QUINAS RO LONGO DRS PAREDES, E 
MRIS fiCIMR RODfl LENTRMENTE UM M 
RPfl HOLOGRfl-FICO' 1 

1730 PRINT "fl REDUZIDA LUMINOSID 
RDE ESUER- DEADfl MAL LHE PERMIT 
E DESCOBRIR AS SAÍDAS";: IF RND > 
.3 THEN PRINT "A SUL E ESTE" 

1735 PRINT 


174-0 RETURN 

1750 ReM ******************** 
1760 REM *SALA 13* 

1770 IF RND>.5 THEN PRINT "SENTE 
DORES AFLITIUAS NO CORPO!" 

1730 PRINT "FOI APANHADO NUM CAM 
PO DE RADIA-COES MORTAL! LENTAME 
NTE COMPRE- ENDE OUE ESTE E" O 5 
EU FIM..." 


1790 IF RND>.5 THEN PRINT "UR' N 
ADA PODE FAZER..." 

1795 IF RND >.5 THEN PRINT "ESTA'' 
DESTINADO A MORRER AQUI!" 

1300 RETURN 

1310 REM ******************* 

1320 REM *SALA 14-* 


1330 PRINT "ENCONTRA-SE NO CENTR 
O DE ENERGIADA NAUE" 

134-0 PRINT "A CARACTERÍSTICA LUM 
INOSIDADE AZUL «METALICA DOS MO 
TORES IONI- COS AINDA EM FUNCION 
AMENTO ENCHETODA A SALA" 

1350 PRINT "ATRAUES DE UMA ESTRA 
NHA NEUOA CONSEGUE UER PORTAS" 
: IF RND>.9 THEN PRINT "PARA NOR 
TE E OESTE" 


1355 IF RND >.6 THEN PRINT "UMA A 
BERTURA CONDUZ AO CENTRO DEMANUT 
ENCAO, MAIS ABAIXO" 

1360 RETURN 

1370 REM ********************* 
1330 REM *SALA 15* 

1390 PRINT "ENCONTRA-SE NO ARMAZ 
EM DE AN- DROIDES" 

1900 PRINT "UE FILAS INTERMINAUE 


IS DE H0MEN5METALIC05, SILÊNCIOS 
05, QUE E5-” 

1910 PRINT "PERAM OUUIR AINDA A 
UOZ DO SEU COMANDANTE MORTO HA’' 
MUITO..." 

1915 PRINT "OBSERUA UMA LUZ A OE 
STE, E UM POCO DE GRAUIDADE AB 
ERTO NO PA- UIMENTO" 

1920 RETURN 

1930 REM ******************** 
194-0 REM *SALA 16* 

1950 PRINT "OUTRA SALA ENORME, C 
AUERN03A, E PREENCHIDA COM MERCA 
DORIAS DE TODOS OS TIPOS": IF 
RND>.7 THEN PRINT " METAIS RARO 
S E ESCULTURAS UE- NEZIANAS..." 
1960 IF RND>.3 THEN PRINT " PED 
RAS CINTILANTES DE XARIAK IU... 

I I 

1970 IF RND>.7 THEN PRINT " PEI 
XE CONGELADO DO DESERTO ES-CALAP 
IANO..." 

1975 IF RND>.9 THEN PRINT "A LUM 
INOSIDADE E' MAIOR A OESTE" 

1930 RETURN 

1990 REM ******************** 

2000. REM *SALA 17* 

2010 PRINT "UMA SALA DE PAREDES 

METALICAS " 

2020 PRINT "CHEIA DE ARMAS CUIDA 
DOSAMENTE ALINHADAS" 

2030 PRINT "EXISTEM SAÍDAS PARA 
OS SOLDADOS" 

2035 PRINT "ANDROIDES A NORTE E 
A ESTE" 

204.0 RETURN 

2050 REM ******************* 

2060 REM *SALA 13* 

2070 PRINT "OLHANDO PARA CIMA UE 
O POCO DE GRAUIDADE OUE CONDUZ 
■R SALA DOSMOTORES" 

2030 PRINT "ESTA' NO CENTRO DE M 
ANUTENCAO" 

2090 PRINT "COM SAÍDAS PARA A SA 
LA DE ARMA-" 

2095 PRINT "ZENAMENTO DE ANDROID 
ES E PARA A SALA DE CARGA" 

2100 RETURN 

2110 REM ********************** 





2120 REH *SflLfl 19* 

2130 PRINT "DESCOBRIU CflSURLMENT 
E R SRLR DE COMANDO DE EMERGENCI 
fl" 

214-0 PRINT "RS PRREDES ESTRO COB 
ERTflS DE UI-SORES COM IMAGENS DE 
TODOS OS PONTOS DR NAUE" 

2150 PRINT "EXISTEM DURS SAIDflS, 

I I 

2160 IF RND >•5 THEN PRINT "UMfl D 
RS GURIS E- O POCO DE GRR- UIDRD 
E" RETURN 

2170 PRINT "UMR DRS GURIS CONDUZ 
fl SRLR DR CRRGR" 

2280 RETURN 

2290 REM ******************* 

2300 REM *MORTE* 

2310 PRINT "UOCE GRSTOU TODO O O 
XIGENIO..." 

2320 GO SUB 3520 

2330 GO TO 1370 

234-0 REM ******************** 

2350 REM *GURRDRR RIGUEZRS* 

2360 IF R(SR,7)<10 TMEN PRINT "N 
RO EXISTE AQUI NflDA DE UALOR": G 
O SUB 3520: RETURN 
2370 IF LUZ =0 THEN PRINT "ESTA'' 
DEMASIADO ESCURO PARfl UER": GO S 
UB 3520: RETURN 

2380 LET P.IOUEZfl=RIQUEZfl+A (SA , 7) 
2390 LET fl (Sfl, 7) =0 
24-00 RETURN 

24-10 REM ******************* 

24-20 REM *TENTATIUfl DE FUGR SEM 
EXITO* 

2430 PRINT "NflO, DEUE FICRR E LU 

TflR" 

2440 LET fl$="L" 

2450 GO SUB 3520 
2460 GO TO 620 

2470 REM ******************** 
2480 REM *OXIG£NIO* 

2490 CLS 

2500 IF 0XI<1 THEN RETURN 
2510 PRINT "TEM ”;OXIj" UNIDADES 
DE OXIGÊNIO" 

2520 PRINT “QUANTAS QUER RDICION 
RR ROS DEPO-SITOS?" 

2530 INPUT Z 
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2540 IF 


>0X1 THEN GO TO 2530 


550 LET OXI=INT (OXI-Z) 


3 5B0 LET ENERGIR=INT (ENERGIA+5* 


Z) 


GO SUB 3520: CLS 
RETURN 

REM ******************* 
REM *INICIRLIZRR* 

CLS 


CLS 


2600 

2610 


2630 

2640 


2660 L 
DROIDE 


2670 
2630 
2690 

2700 FOR B=1 TO 19 
2710 FOR C=1 TO 7 
2720 REflD fl(B,C> 
2730 NEXT C 
2740 NEXT B 
2750 INPUT "GURL E 
COMANDANTE? ”;N* 
2760 CLS 

2770 LET SR=3: REM 
IflL (SR=N. DR SRLR 
2780 LET LRSER =0 
2790 LET TRRNS=0 
2300 LET IRO=0 
2310 LET FRTO=0 
2320 LET LUZ=0 


LET ENERGIfl = INT (RND*50) + 7a 
LET RIOUEZR=INT <RND*50)+50 
LET OXI = INT (RND*16) 

LET RELRTOR10=0 
LET GO—0 

LET MM=0 : REM *NUMERO DE RN 
ES/flLIENIGENOS DESTRUÍDOS* 
REM ********************* 
REM *DEFINIR.NRUE* 

DIM fl(19 j 7) 


0 


EU NOME, 


2770 LET SR=3: REM *POSICAO INIC 
IflL (SR=N. DR SRLR)* 

2730 LET LRSER=0 
2790 LET TRRNS=0 
2300 LET IRO=0 
2310 LET FRTO=0 
2320 LET LUZ=0 

2330 REM ******************** 
2340 REM *DISTRIBUIR CRÉDITOS* 

2350 FOR J=1 TO 7 

2360 LET M=INT (RND*19)+1 

2370 IF M=6 OR M=ll OR Sfl = 13 OR 

fl(M,7) < > 0 THEN GO TO 2360 

2330 LET fl(M,7)=INT <RND*100)+10 

2390 NEXT J 

2900 REM ******************** 
2910 REM *DISTRIBUIR RLIENIGENOS 
/ANDROIDES* 

2915 FOR T=1 TO 2 

2920 FOR J=1 TO 4 

2930 LET M=INT (RND*13)+1 

2940 IF M=6 OR M=ll OR M=13 OR fl 


2830 

2340 


REM 

REM 

FOR 
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iíj,7) <>0 THEN GO TO £900 
2950 LET A ÍM, 7) =-.J 

2950 NEXT U 

2955 NEXT T 

2990 RETURN 

2?®? 5IS ******************** 

NTO* REM * flNDR0II>E DE «BASTECIME 

3 ?20PRINT "APARECEU UM ANDROIDE 
„Çg CIMENTO" 

3030 GO SUB 3260 

3040 IF RIQUEZA-C.l THEN LET Z=0: 


3030 GO SUB 3250 
3040 IF RIQUEZA < 
GO TO 3130 

3050 PRINT "UOCE 

1 

EONICA f$151" 
3060 PRINT ” 2 

fl ($10)“ 

3070 PRINT ” 3 
3030 PRINT " 4. 
UNIDADE)" 

3090 PRINT " S 
DE MflTERIfl 
3100 PRINT " 5 


PODE COMPRAR: 

- LANTERNA NUCL 


2 - PISTOLA IONIC 


B 


- LASER (420)“ 

- OXIGÊNIO (i2/ 

- TRANSPORTADOR 
í$30) ” 

- FATO DE COMBA 


3110 PRINT " 0 - C 

NTURA" 

3120 INPUT "NUMERO D 

3130 ÍE 2=0 ™EN CL5 
314-0 IF 2 = 1 THEN LET 

RIQUEZA=RIQUEZA-15 

3150 IF Z=2 THEN LET 
RIQUEZfi =RIQUEZR-10 
3160 IF Z =3 THEN LET 

T RIQUEZA=RIQUEZA-20 

3170 IF Z=5 THEN LET 
T RIQUEZA =RIQUEZR-30 
3180 IF Z=6 THEN LET 


0 - CONTINUAR AUE 


DA ÜPCAO? 

5 : RETURN 
T LUZ =1: L 


LET IAO =1 


LET 


= 1 


LET TAANS =1 




ir Z=t> THEN LET FATQ = 1 ■ 

RIQUEZR=RIQUEZR-50 

Mxnn THEN PRINT 

NTOUENir AN AR-HE! " : LET RIQUE 

i,,L>-T ÇPTO=0. LET LUZ =8; LET 
3200 IF 2<>4 THEN GO TO 3030 


A =0 
IAO 


0 


1 1 ♦ 


.3 21 ®.Í N ÇUT "QUANTAS UNIDADES? 

G: LET G=INT (O) 

?/? 20 2*0 /RIQUEZA THEN PRINT " 

NAO TEM DINHEIRO SUFICIENTE"; AO 
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TO 3210 

3230 LET OXI=0X1+0 

324-0 LET RI0UEZA=RI0UEZA-2*0 

3250 GO TO 3030 

3260 IF RIQUEZA>0 THEN PRINT : P 
RINT : PRINT "UOCE TEM ";RIQUEZA 
; " CRÉDITOS" 

3270 IF RIQUEZA=0 THEN PRINT "NA 
0 TEM CRÉDITOS": GO SUB 3520: RE 
TU RN 

32S0 FOR J = i TO 4-: PRINT : NEXT 

J 


3290 RETURN 
3300 REM 


3310 DATA 0,5;2j0,0,0,0: REH SAL 
A 1 

3320 DATA 0,0,8,1,0,0,8: REH SAL 
A 2 

3330 DATA 3,7,4,3,3,3,8: REH SAL 
A 3 

334-0 DATA 0,0,0,3,0,0,0: REH SAL 
A 4 

3350 DATA 1,5,7,5,5,5,8: REH SAL 
A 5 

3360 DATA 6,6,6,6,6,5,8: REH SAL 
A 6 

3370 DATA 3,0,3,5,0,0,8; REM SAL 
A 7 

3380 DATA 8,12,3,7,3,3,0: REH 5A 
LA 3 

3390 DRTfl 11,13,10,0,0/0,0: REM 
SflLfl 9 

34-00 DRTfl 0,14-,0,9,0,0,0: REM Sfl 

Lfl 10 

34-1*0 DATA 9,6,6,6,6,6,0: REM SAL 

fl 11 

34*20 DATA 3,16,19,0,0,0,0: REM 5 
ALA 12 

34*30 DATA 13,0,0,13,0,13,0: REM 
SALA 13 

34*4*0 DATA 10,0,15,17,0,13,0: REM 
SALA 14 

34*50 DATA 0,0,0,14-, 0,19,0 : REM S 
ALA 15 

34.60 DATA 12,16,16,13,16,15,0; R 
EM SALA 16 


34-70 DATA 14-, 0,18,0,0,0,0 : REM S 
ALfl 17 


34*30 DATA 0,0,16,17,14-, 0,0 : REM 
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5RLR 13 

34-90 DRTR 0,12,0,0 

R LR 19 

3500 REM *********; 

3510 REM *flJUSTE ’0 
GOSTO* 

3520 FOR T =1 TO 90- 
3530 RETURN 


15,0,0: REM S 

********* 
RTRR3Ü RO SEU 

NEXT T 



XVIII 

ARMADILHAS 


Espero que o leilor tenha já introduzido na máquina o progra¬ 
ma “O Desastre Asimovíano”, e tenha tentado resolvê-lo antes 
de passar a este capítulo. Aprenderá muito mais com este livro se 
proceder desse modo, em vez de continuar a ler o que nele se en¬ 
contra escrito sem introduzir os programas no computador. 

Antes do mais, a planta usada nesta aventura c bastante mais 
complexa do que o mapa do castelo: 
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Existem vários pormenores pouco habituais neste mapa, que 
de resto poderão ser incorporados nos seus próprios programas 
de aventuras de resolução mais difícil. 

Para começar, algumas das salas (a3,a5,a8ea 16) possuem 
saídas tipo “ciclo sem fim” que nos conduzem ao ponto de par¬ 
tida. Esta técnica é muito útil quando se quer dar uma impressão 
de grande tamanho. Todas estas salas, como o leitor poderá veri¬ 
ficar pelo mapa, sào salas bastante grandes que podem ser repre¬ 
sentadas na prática do modo descrito. As instalações hidropóni- 
cas (sala 5) podem ter uma área enorme, e a sala de onde parti¬ 
mos, além do armazém de carga (salas 3 e 16) podem ser quase 
tão grandes como aquela. 

A outra sala nas mesmas condições (sala 8) contém cerca de 
1000 passageiros e portanto possui também dimensões bastante 
amplas. 

Ü leitor deverá recorrer a este “ciclo sem fim” em duas situa¬ 
ções diferentes. A primeira é quando desejamos dar uma ideia de 
grandes dimensões a uma sala (“Está num deserto que se estende 
por quilómetros em todas as direcções”). A segunda situação é 
quando se deseja reter o jogador num labirinto, com apenas uma 
saída que pode consistir no emprego de uma palavra mágica, por 
exemplo, em vez de consistir numa saida normal, escondida. 

Tudo o que sobe... 

Para confundir ainda mais os jogadores, podemos ligar as sa¬ 
las através de túneis que não abrem para elas do modo habitual, 
nas direcções esperadas (como poderia acontecer numa grande e 
complexa nave espacial ou num labirinto subterrâneo). Para per¬ 
ceber melhor o que pretendo dizer com isto, o leitor poderá estu¬ 
dar as salas 14 e 17. Para passar da primeira à segunda sai-se pa¬ 
ra oeste, mas volta-se atrás caminhando para norte. 

A situação é ainda mais confusa no caso das salas 15, 19 e 16 
(sendo piorada também pelo ciclo sem fim de sala 16). Desce-se 
de 15 para chegar a 19 (e sobe-se de 19 para voltar a 15), mas 
avança-se para sul a partir de 19 entrando em 16 por oeste. Des¬ 
cobrir esta passagem pode levar bastantes horas a um Aventurei¬ 
ro.,. 


Sala da morte 

Se o jogador tomar a decisão errada no hospital (sala 9) passa 
para a sala 13, que não é de facto uma sala mas sim a * ‘morte por 
radiação”. Como pode verificar estudando o modo como se usa 
aqui a “sala 13”; compreenderá como este tipo de salas pode ser 
bastante útil para incluir mortes “especiais” para o jogador. 

Sentido único 

Se bem que todas as ligações neste jogo sejam feitas nos dois 
sentidos (uma situação que não deve acontecer necessariamen¬ 
te), è fácil compreender, observando cuidadosamente o mapa, 
que o jogador se pode encontrar facilmente em verdadeiros be¬ 
cos sem saída... A sala 2, por exemplo, força o jogador a voltar 
atrás sobre os seus passos até à sala 7 antes de poder progredir. 
A sala 4, a plataforma de observação, apenas permite olhar para 
as estrelas (o que tem pelo menos a vantagem de contribuir para 
o clima desta aventura). 

A única maneira de entrar na sala onde se encontra o vaivém 
consiste em passar por uma ou mais das salas na parte inferior 
da planta, mas como já dissemos existe precisamente neste sector 

um certo número de armadilhas. 

Conjugando tudo 

Estudando esta aventura, em particular o mapa e a correspon¬ 
dente Tabela de Movimentos contida nas declarações DATA, é 
possível aprender bastante sobre as diferentes maneiras de tor¬ 
nar uma aventura mais difícil de resolver, mantendo simultanea¬ 
mente um ambiente coerente. 

Chamo a atenção do leitor para o facto de poder encontrar, 
nos apêndices finais deste livro, uma versão renumerada desta 

aventura. 

Avance por si mesmo 

O leitor já pôde verificar como é fácil modificar uma dada lis¬ 
tagem de modo a desenvolver um novo programa de aventuras 
que parece ser completamente original. O leitor pode agora vol- 
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tar à primeira versão de ,4 Os Lobisomens e o Aventureiro” e 
construir uma planta nova, completamente concebida por si, 
num ambiente que lhe pareça mais interessante, escrevendo as¬ 
sim um programa de aventuras que seja de facto seu. Como se 
pode verificar estudando ”0 Desastre Asimoviano”, grande 
parte do trabalho já está feito... 
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XIX 


A ULTIMA FANTASIA 


Chegamos agora ao último projecto deste livro, um programa 
de 18 Kbytes intitulado “A Cidadela de Pcrshu”. Este programa 
bastante grande, que coloca o jogador frente a uma fantástica 
colecção de monstros e entidades de outros tipos, possui mais de 

quarenta salas distribuídas por três níveis. 

Neste novo programa vamos incorporar todas as ideias que já 

discutimos sobre programas de aventuras, e acrescentamos algu¬ 
mas novas, como a possibilidade de transportar objectos e deixá- 
-los nas salas (descobrindo, maravilha das maravilhas, que ainda 

lá estão quando voltamos a elas!) 

Os combates são menos controlados pelo gerador de números 
aleatórios, e o jogador controla mais ou menos os seus próprios 
atributos ou características ao longo da aventura. Se não gostar 
da situação no início de um combate, pode até fazer invocações 
mágicas (até um total de três por jogo) que lhe garantem a vitó¬ 
ria no combate em causa, 

Não se trata certamente de uma aventura fácil de resolver. 
Existem nela várias armadilhas, e nem sequer tentarei explicá-las 
todas ao leitor. Parece-me muito mais correcto colocá-lo imedia¬ 
tamente no ambiente da aventura, e deixá-lo encontrar (e acabar 
por resolver) os problemas que lhe surgirão. Examinando a parte 
relevante da listagem depois de ter resolvido o problema ser- 
-Ihe-á fácil descobrir o modo como este se encontra codificado, e 
este estudo perraitir-lhe-á incluir situações equivalentes nos seus 
próprios programas. 

Muitos programas de aventuras utilizam (ou parecem utilizar) 
um vocabulário ilimitado. Tal como as duas aventuras já estuda¬ 
das neste livro, “A Cidadela de Pershu” não se encontra nestas 
condições. Teria sido relativamente fácil incluir um vocabulário 
mais extenso. Poderia fazê-lo usando truncatura de cadeias alfa- 
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numéricas para reconhecer ordens Guardar, Pegar ou Agarrar 
como equivalendo essencialmente à mesma coisa, c para verifi¬ 
car se a palavra seguinte — por exemplo Diamante — correspon¬ 
de de facto ao objecto que está à disposição do jogador. Talvez o 
leitor deseje modificar este programa mais tarde de modo a in¬ 
cluir um vocabulário mais vasto. 

N o entanto, além de ter concebido este programa como um 
auxiliar de aprendizagem, pretendi facilitar a sua execução de 
modo a permitir ao jogador concentrar-se na definição do mapa 
e na tentativa de sair do aparentemente interminável labirinto de 
salas, escadas e passagens. 

Portanto, quase todas as entradas são feitas por INKEYS, a 
fim de não ser necessário carregar em RETURN ou ENTER de¬ 
pois de escrita a ordem. Vejamos então o vocabulário básico do 
programa, que permitirá resolver todas as situações possíveis ex- 
cepto as comandadas por “menús” de opções. Não esqueça que 
em todos os casos, excepto “subir** (U) deverá escrever apenas a 
primeira letra: 

Abandonar (o jogo) 

Combater 

Fugir (a um combate; raramente têm êxito) 

Guardar (nunca existe mais do que um objecto em cada sa¬ 
la, pelo que o computador sabe sempre a que objecto se 
refere esta ordem) 

Largar (não poderá largar qualquer objecto numa sala onde 
já exista outro, e os objectos a largar são definidos por 
um menú. Note que os monstros não contam como ob¬ 
jectos) 

Norte 

Sul 

Este 

Oeste 

Subir (escrever “U”) 

Descer 

Este vocabulário aparentemente pequeno permite-lhe uma 
surpreendente variedade de escolha em muitas situações, como 
poderá verificar nos “instantâneos** desta aventura que repro¬ 
duzimos em seguida: 


ANDREIJ 




ENERGIA 9 
DtSTRtZA 12 

SABEDORIA 3 


CARISMA 18 

INTELIGENC±H 9 

CONSTITUIÇÃO I 



E'uTh NA tNTRADA DA ClL^AL^tLH Dt 
PERSHU. 

RFRSTE-SE ENQUANTO E" TEMPO; 
MUITOS MAIS FORTES DO OUE UOCE 
AMEDRONTARAM-SE FRENTE A ESTAS 
TORRES AMEAÇADORAS! 

SE POREM INSISTE NA SUA TEMERI¬ 
DADE, AUANCE PARA O PORTÃO NcGRO 
A ESTE... 


tsTfl' A UER.. . 
ARCHOTE 




ANDREW 

Ol-^POt utz 3 tNuRNTlnM£MTO o t 
UOCE TEM: ARCHOTE 

$ 100 


ENERGIA 13 
DESTREZA 3 
SABEDORIA 3 


CARISMA 12 
INTELIGÊNCIA 15 
CONSTITUIÇÃO 5 


A MEIO DA SALA ENCONTRA-SE UM 
ALTAR EM PEDRA; E SOBRE ELE DUAS 
UELAS AfhGADAS, 

NUMA DAS EXTREMIDADES DO ALTAR 
ESTA’. UM LIURO ANTIGO; COBERTO 
POR UM UELHQ PERGAMINHO, 

ESTA 1 ' A OU I UM DRAGAO DO GELO 
COM OS SEGUINTES ATRIBUTOS: 
ENERGIA 13 CARISMA 15 

DESTREZA 3 INTELIGÊNCIA lí? 

SABEDORIA 3 CONSTITUIÇÃO S 
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QUE DESEJA FAZER? 
F 


EM QUE DTRECCAO? 
N 


t * ■ f ■ -■ Tt TÍ' TT ^ TT i ■ # k 


ANDREU 

DISPÕE DE O ENCANTAMENTOS. 
UOCE TEM: ARCHOTE 

$ 100 


ENERGIA IS CARISMA 12 

DESTREZA 3 INTELIGÊNCIA 15 

SABEDORIA 3 CONSTITUIÇÃO S 


ENCONTRA-SE NAS COZINHAS DA CI¬ 
DADELA. 

UE UM ENORME PEDAÇO DE CARNE RO¬ 
DANDO LENTAMENTE SOBRE 0 FOGO. 
EXISTEn PORTAS PARA OESTE E SUL, 
ALEM DAS QUE DAO ACESSO A ARMA- 


QUE DESEJA FAZER? 


ü 

DISPÕE DE 3 ENCANTAMENTOS. 

UOCE TEM: ARCHOTE 

$ 100 

ENERGIA IS CARISMA 12 

DESTREZA 3 INTELIGÊNCIA 15 

SABEDORIA 3 CONSTITUIÇÃO S 

ESTA' 1 NA AREA DE ABASTECIMENTO 
ALIMENTAR DA CIDADELA. 

UE QUEIJOS, PAES DE COR ESCURA, 

E MUITOS SACOS COM OUTROS PRODU¬ 
TOS . 


ENCONTRA UM GORGONZO 

COM OS SEGUINTES ATRIBUTOS: 

ENERGIA 15 CARISMA 3 
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DESTREZA 12 INTELIGÊNCIA 12 

SABEDORIA 15 CONSTITUIÇÃO 3 

QUE DESEJA FAZER? 

C 


OPOSITOR: GORGONZO 
COM OS SEGUINTES ATRIBUTOS: 
ENERGIA 12 CARISMA 6 

DESTREZA 6 INTELIGÊNCIA 13 

SABEDORIA 12 CONSTITUIÇÃO 6 

E 05 SEUS ATRIBUTOS SAO: 

ENERGIA 13 CARISMA 12 

DESTREZA 3 INTELIGÊNCIA 15 

SABEDORIA 3 CONSTITUIÇÃO 6 


ESCREUA 1 PARA USAR UM ENCANTA¬ 
MENTO , OU 2 PARA ENFRENTAR 0 
INIMIGO. 


QUE ATRIBUTOS UAI USAR <25? 

1 

4- 


A LUTA INICIA-SE A SEU FAUOR. 
GORGONZO - 33 

ANDREU - 44- 

UOCE FERE 0 MONSTRO! 

GORGONZO — "w*7 

ANDREU - 44 

UOCE FAZ SANGRAR 0 MONSTRO! 

GORGONZO - 36 

ANDREU - 44 

UOCE FAZ SANGRAR 0 MONSTRO! 




GORGONZO 
RNDREUI - 4-4. 

UOCE FRZ SRNGRRR O 
GORGONZO 
RNDREUI - 4-4- 

UOCE FOI FERIDO! 

UOCE PERDE SANGUE! 

GORGONZO 
RNDREUI - 4-1 

O MONSTRO TIRA-LHE 
GORGONZO 
RNDREUI - 4-1 

UOCE ATINGE=0 COM UIOLENCIR 


GORGONZO 
RNDREUI - 

ri 

4-1 

- 33 

UOCE PERDE SANGUE! 


GORGONZO 
RNDREUI - 

H 

39 

- 33 

UOCE FOI 
GORGONZO 

FERIDO! 

ri 

- 33 

RNDREUI - 

36 



O GORGONZO CONSEGUIU 

LEUAR A MELHOR DESTA UEZ! 


Como poderá ver neste exemplo, o jogador possui seis carac¬ 
terísticas principais: 


FORÇA — Força muscular 
INTELIGÊNCIA — Poder cerebral 
CARISMA — Magnetismo pessoal 

SABEDORIA — Poder mental temperado pela experiência 
DESTREZA — Habilidade no uso das armas 
CONSTITUIÇÃO — Vitalidade 


Devido à estranha lógica do mundo onde esta aventura se rea¬ 
liza, todas as entidades que o aventureiro encontra (desde a Hi- 



MONSTRü! 
- 34- 


- 34- 


42 DR MflÜ! 
- 34- 


dra de Dez Cabeças até ao Lagarto de Fogo) dispõem igualmente 
dessas características. No entanto, só é necessário utilizar em lu¬ 
ta duas delas. Se for prudente escolherá aquelas em que é supe¬ 
rior ao inimigo. Enfrentá-lo-á baseando-se no total dos dois atri¬ 
butos escolhidos, modificado ate certo ponto (a seu favor) pelas 
armas (Espada, Maça de armas), protecções (Cota de malha, Es¬ 
cudo, Manto de protecção) e outros objectos de uso geral (Esfe¬ 
ras de fogo)... 

Não sc preocupe se isto lhe parecer complicado. Ao executar o 
programa verificará que tudo se torna claro. Quando examinar a 
parte apropriada do programa (linhas 3690 a 4190), verificará 
como se usam os atributos para definir as condições da luta, e 
como são modificados ao longo desta. Note que pode ser morto 
por uma derrota séria, terminando o programa nesse momento. 

Na Cidadela encontram-se muitos tesouros. Se bem que possa 
recolhê-los (e quanto mais for a riqueza de que dispuser no final 
do jogo, melhor será a pontuação final), não pode largá-los. 
Quando os guarda, o correspondente valor é somado aos valores 
que já possui, deixando de existir sob qualquer outra forma. 

Os tesouros que poderá encontrar na Cidadela, com diferentes 
valores de cada vez que joga, serão: 

Esmeraldas 
Anéis de prata 
Dobrões de ouro 
Bola de cristal 
Gemas elementares 
Pedras deformantes 
Olhos de Dragão 
Diamantes de Duende 
Pedaços de Oito 

Além dos nove tesouros citados, existem nove objectos (já 
mencionados) que o jogador poderá encontrar durante a aventu¬ 
ra, e que podem ser guardados ou largados em qualquer momen¬ 
to. Os nove objectos são: 

Archote 
Chave de prata 
Chave de ouro 
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Espada 

Cota de malha 
Escudo 

Manto de protecção 
Esferas de fogo 
Maça de armas 

As duas chaves são muito importantes. Existem nesta aventu¬ 
ra duas portas fechadas, que impedem o jogador de ter acesso a 
certas regiões do mapa. Não poderá passar por estas portas sem 
dispor das chaves apropriadas. A primeira porta deverá ser aber¬ 
ta com a Chave de Prata (a primeira que encontrará) e a segunda 
(perto do final da aventura) obriga ao uso da Chave de Ouro. As 
chaves desaparecerão depois de terem sido usadas, ficando nas 
correspondentes portas. Não têm aliás qualquer outra utilidade. 

Você ficará completamente perdido sem o archote, pelo que 
convirá guardá-lo assim que o encontrar. Sem ele (como virá a 
descobrir se o largar numa sala, pois apagar-se-á imediatamen¬ 
te!) nada conseguirá ver. Felizmente, o archote reacende-se au¬ 
tomaticamente assim que se pega nele... 

tl ^^ráar^e largar objectos acrescenta uma nova dimensão de 
‘realismo” a um ambiente de aventuras, como o leitor facilmen¬ 
te descobrirá. Largar qualquer coisa numa sala, explorar outras 
voltar àquela c descobrir o objecto que se deixou ficar é (pdò 
menos em minha opinião) bastante interessante, poraue dá alou- 
ma coesão ao mundo que criámos e estamos a percorrer. 

Conv ' rá avisar o leitor de que a planta é um tanto esLranha. As 
“despensas” são um labirinto formado por sete salas ligadas en¬ 
tre si, e o leitor terá algum trabalho para sair delas, 

A adega é um milagre da arquitectura moderna. Consiste nu¬ 
ma área central, circular, com uma sala em cada uma das direc¬ 
ções da bússola. Um túnel liga a porta norte da saia a norte à 
porta oeste da sala a oeste. 

Como poderá compreender a partir da descrição destas duas 
salas, a definição da planta não será muito fácil. 

^ prosrsinâ permite o uso de 47 salas em vez das 43 apresenta¬ 
das no mapa. As quatro “salas” restantes correspondem de fac¬ 
to a quatro “mortes” particularmente dramáticas. Digamos que 
se entra na morte a partir de uma sala, por exemplo caindo 
numa logueira ou entrando num curso de água que nos arrasta 


148 


para uma cascata. As mortes dramáticas a que nos referimos 
são: 

Sala 44 — morte por afogamento 

Saía 45 — morte no fogo 

Sala 46 — morte por petrificaçào mágica 

Sala 47 — morte por queda num poço sem fundo 

«■ 

E fácil incorporar “mortes” nos seus programas usando este 
método, Deixar pessoas cairem de altas torres, ou tropeçarem 
em poços sem fundo quando uma sala está tão cheia de fumo 
que não se consegue ver convenienlemente (como acontece nesta 
aventura) é uma boa forma de manter uma tensão ao longo do 
jogo. 

Incidentes como estes, juntamente com um mapa bastante 
complexo (se bem que ainda coerente e estável), garantem que os 
seus amigos terão alguma dificuldade em resolver a aventura. 
Você próprio vai encontrar alguns problemas, em particular se 
não fizer batota, olhando para o mapa antes de experimentar o 
programa. 

Os seus problemas tornam-se ainda mais graves devido aos 
inimigos que será obrigado a enfrentar no interior da Cidadela. 
Aqueles que irá encontrar serão escolhidos da lista seguinte (e, 
tal como as riquezas, poderão encontrar-se em posições total¬ 
mente diferentes de cada vez que executar o programa): 

Vampiro, Gárgula, Medusa, Mago, Galgo Demoníaco, Hi¬ 
dra de Dez Cabeças, Lagarto de Fogo, Patriarca, Estátua 
Viva, Mestre Ladrão, Gigante, Homem-urso, Predador, 
Nigromante, Monstro do Frio, Aranhão, Lobisomem, 
Dracolino, Gorgonzo. 

Como poderá verificar observando a listagem completa (ocu¬ 
pando, como já disse, cerca de 18 Kbytes no meu sistema, um 
IBM PC, e exigindo cerca de 2,5 Kbytes além disso quando em 
execução) no capitulo seguinte, as diversas fases da codificação 
apresentam-se claramente identificadas por declarações REM. 
Para poupar tempo, o leitor poderá eliminar as declarações 
REM que contêm apenas asteriscos (estas servem apenas para fa¬ 
cilitar a procura visual de cada bloco, e nunca são usadas em 
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chamadas de subrotinas), tal como quaisquer declarações REM 
que terminem numa linha de instruções. Não elimine no entanto 
as declarações REM que identificam os diversos biocos, dado 
que são muitas vezes usados ern chamadas de subrotinas (pelo 
menos no caso de o seu sistema parar com mensagem de erro 
nestas condições). 

Um outro modo de comprimir o programa consiste em elimi¬ 
nar todas as linhas de descrição de salas excepto a primeira de 
cada. As instruções PRINT, como o leitor depressa compreende¬ 
rá, ocupam um espaço enorme. Se substituir uma linha do tipo 
REM Sala 1 por uma descrição completa, do tipo PRINT “Rio 
Subterrâneo*'; RETURN poderá eliminar todas as linhas que se 
seguem à REM na listagem original, incluindo a de RETURN fi¬ 
nal. 

Se proceder deste modo, poupando ao máximo a memória 


J2 


I. RIO 


Dt AUMfcNTOS 


J. COZINHA 



ocupada, verifique que as chamadas de subrotinas (linhas 470 a 
520) ainda referenciam de facto as descrições apropriadas. Se 
quiser, pode fornecer aos jogadores impressos contendo o resto 
da informação, de modo a poderem ler aquilo que não “cabe" 
no computador; se o fizer, no entanto, deverá identificar as salas 
de algum modo — por exemplo, usando Al , A2, etc. a fim de 
facilitar ao jogador a descoberta da descrição apropriada. 


SUBIR PARA Ifi 



SUBIR PARA 19 


Fig, 8 
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Finalmente, vamos apresentar o mapa da Cidadela. Sugiro ao 
leitor que não o consulte antes de tentar resolver esta aventura 
utilizando o seu cérebro. Depois disso volte a este capítulo e 
compare as figuras que se seguem com o mapa que construiu. 
Esta comparação, assim como o estudo aprofundado do modo 
como o programa codiíica a aventura, servirá como uma óptima 
conclusão do nosso estudo dos jogos de aventuras. 
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XX 


50 

GO 

5 U B 

2D0 : 

RE 

M *REL 

.PT ORIG 

50 

r"™í 

5 U B 


PR 

INT : 

RtM 
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CPO , N$ J M £ ' " • 

200 PRINT 3*DINHEIRO+30*MM+3* (E 
N+CA+DE+IN+SB+CO)+RELRT; "." 


210 L 

9 THEN 
0 

220 X 


LET W =5A+RELAT/1000 


I 


4 i 


i*i * r H 

■ + ¥ ¥ » 


LET U=W-(RND*3): GO TO 21 


220 IF 3R=31 THEN LET g=100 
230 PRINT "REALIZOU ”; INT (W) ;" 
V. DA AUENTURA, ” 

24-0 5T0P 

250 REM *********************** 
260 REM *RELATQRIO DA SITUACAO 
DO JOGADOR* 

270 PRINT N$ 

260 IF M >0 THEN PRINT "DI5P0E D 
E " ; M; " ENCANTAMENTOS." 

290 IF MM >0 THEN PRINT "MATOU " 
; MM; " MONSTROS." 

300 PRINT "UQCE TEM:", 

310 FOR J=1 TO 9: IF 0(J)=0 THE 
N GO TO 316 

315 PRINT T*(O(J)J , 

316 NEXT J 

320 IF DINHEIRO>0 THEN PRINT “$ 
";DINHEIRO 

330 IF EN <0 THEN LET EN=0 
34.0 IF CA<0 THEN LET CA=0 
350 IF DE <0 THEN LET DE=0 
360 IF IN-Í0 THEN LET IN=0 
370 IF SB <0 THEN LET SB=0 
380 IF CO<0 THEN LET CO=0 
390 PRINT : PRINT "ENERGIA "; EN 


N 


$ 


N 


"CARISMA "’CA 
400 PRINT "DESTREZA ";DEINTEL 
IGENCIA ";IN 

410 PRINT "SABEDORIA ";SB,"CONS 
TITUICAO ";CO: PRINT 
420 RETURN 

430 REM *********************** 
440 REM íDESCRICAO DAS SALAS* 
450 IF LU=0 AND SA<>6 THEN PRIN 
T "ESTA' MUITO ESCURO": GO SUS 2 
740: RETURN 

460 GO SUB 2630+SA*70 
470 GO SUB 2740: RETURN 


,"INTEL 
B, "CÚNS 


GO SUB 


SUB 2S30+SA*70 
SUB 2740: RETU 


470 GO SUB 2740: RETURN 

480 REM *********************** 

490 REM *DESCRICAO DE M0N5TR0S* 
500 LET G$=M*<A(SA,3)) 

510 LET Sl=(INT tRND*S)+1)*3 
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520 LET Hl =(INT (RND*6)+1)*3 
530 LET 01= <INT (RND*S)+1) *3 
540 LET 11=(INT (RND*6)+1)*3 
550 LET Uls (INT (RND*6>+1)*3 
560 LET Cl= íINT (RND*6>+1)*3 
570 IF RND >.5 THEN PRINT "ENCON 
TRA UM ";GÍ: GO TO 590 
530 PRINT "ESTA' AOUI UM ";Gí 
590 PRINT "COM 05 SEGUINTES ATR 
IBUTOS:" 

600 PRINT "ENERGIA ";S1,"CARISM 
A ";H1 

610 PRINT "DESTREZA ";Dl;"INTEL 
IGENCIA "; II 

620 PRINT "SABEDORIA ";W1,"C0NS 
TITUICAO ";Cl 
630 GO SUB 2740 
640 RETURN 
550 PEM 

* ™ ™ J I I 1+ * * ■+ #f 4 I ¥ + ff ¥1 P ■ ■ i ■ * ■ ¥ n 4 ¥ * ■ P p ■ n -Pi ■■ ™ - 1 ■ ■■ ' ' 

560 REM *DE5CRICAÜ DO CONTEÚDO* 


530 

54-0 


; 51, !1 CARI5M 


DESTREZA ", Dl,"INTEL 


54-0 RET 


SS0 

670 

630 

690 

700 

710 

720 


PRINT "CO 


t>50 RFM 

* ™ ™ J P I I l¥ i * ■ + #f J ■ ¥ + ¥ ¥ ¥1 Pi I i ■ * ■ ¥ n 4 ¥ * ■ P P ■ H -Pi ■■ ™ - 1 ■ ■■ ' ' 

660 REM *C>E5CRICA0 DO CONTEÚDO* 
670 LET Gí=T4<A(SA,7)) 

630 LET UALOR=INT (RND*100)+56 
690 PRINT "ESTA' A UER.,." 

700 GO SUB 2740 
710 PRINT Gí 

720 IF A(5A,7) >9 THEN PRINT "CO 
M 0 URLOR DE í";UALOR 
730 GO SUB 2740 
740 RETURN 

750 REM *********************** 
760 REM *6UAP.DAR TESOURO* 

770 IF LU=0 AND A ISA, 7) Oi THEN 
PRINT "ESTA' MUITO ESCURO PARA 
UER.": GO SUB 2740: RETURN 
730 IF A(5A,7)=1 THEN LET LU=1: 
REM *JOGADOR POSSUI ARCHOTE* 

790 IF A(5A,7)>9 THEN LET DINME 
IRO=DINHEIRO+UALOR: GO TO 310 
300 LET C (A t SA ,7'i ) =R (SR , 7) 

310 PRINT "OK,": LET A(SA,7)=0 
320 RETURN 

330 REM *********************** 
340 REM *LARGAR OBJECTOS* 

350 LET FLAG =0 

360 FOR Z=1 TO 9: IF C<Z) O0 TH 
EN LET FLAG=1 
370 NEXT Z 

380 IF FLAG=0 THEN PRINT "NAQ T 
RAZ NADA CONSIGO.": GO SUS 2740: 


330 

340 


EN L 

370 

830 

RAZ 
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RETURN 
393 IF 


HÍSH,7! 


+ 


>0 THE rí PRINT 


LET LU =0: REM 


970 

930 


1000 

1010 

1020 

1030 


REM 


cs 


R' EXISTE AQUI UM OBUECTO .": GO 
SUB 274-0: RETURN 
900 PRINT ”UOCE TEM. ' 1 
910 FOR 2=1 TO 9 

920 IF C(Z)O0 THEN PRINT Zi " " 

:TiÍZ■ 

930 NEXT Z 

94-0 PRINT : INPUT “NUMERO DO OS 
JECTO R LRRGRR: ";K 
950 IF C (K:> =0 THEN PRINT “NRÜ T 
EM ESSE OBUECTOGO SUS 274-0: 
GO TO 94.0 

960 IF K. = 1 THEN LET LU=0: REM * 
RPRGRR ARCHOTE* 

970 LET A(SR,7)=K 
930 LET C íK) =0 
990 RETURN 

1000 REM ÍT-Hrííííitíi-Hiííiífíiríí 
1010 REM «COMBATE* 

1020 IF RíSA,Si=0 THEN RETURN 
1030 PRINT : PRINT "OPOSITOR: "; 
Gi 

104-0 LET MT =0 : LET HT=0: REM *ES 
TADO DOS CONTENDORES* 

1050 PRINT "COM OS SEGUINTES ATR 
IBUTOS:" 

10S0 PRINT "ENERGIA ";51,"CARISM 
A " Hl 

1070 PRINT "DESTREZA Dl,"INTEL 
IGENCIk ,f Xi 

1030 PRINT "SABEDORIA ";Ul,"CONS 
TITUICAO ",Cl 

1090 PRINT : PRINT "E OS SEUS AT 
RIBUTOS SAO:" 

1100 PRINT "ENERGIA ";EN,"CARISM 
A " ’ CA 

1110 PRINT "DESTREZA ";DE,"INTEL 
IGENCIA ";IN 

1120 PRINT "SABEDORIA SB, "CONS 
TITUICAO ";CO: PRINT 
1130 PRINT : IF C (4-) ■: >0 THEN PRI 
NT "UOCE TEM UMA ESPADA": LET HT 
=HT + 1 

114-0 IF C (5) < >0 THEN PRINT "A MA 
CA DE ARMAS SER-LHE-R 4 UTIL.": L 
ET HT =HT +1 

1150 IF CÍ6JO0 THEN PRINT "A CO 


t OS SEUs 




L 


’ 1 
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TA DE MALHA DAR-LHE-A 1 UMA 
AGEM.": LET HT =HT + 1 ^ T1 ._ 

1160 IF 0(7) <>0 THcN PhINT 


U A NT 


i : 


CUDO AUMENTARA A SUA DEFESA,': i- 

ET HT =HT + 1 _ _ , 1C: .- T n 

1170 IP C(8JO0 THEN PRINT EoTfl 
ENUOUJIDO NÜ 5EU MRNTu DE PRuT 
ECCAQ.": LET HTaHT + 1 ItQ , R 

1130 IP C(9)O0 THcN HRINT 5* | 
ÜLR5 DE FOGO AUMENTAM ü sEU *-ODl- 

R, ,f : LET HT =HT + 1 _ 

1190 IP íi:>0 THEN PRINT - 

1 ppRR USAR UM ENCANTA- HENTU; ü 
Lí £ ppRR ENFRENTPR 0 _ INIHIGL*. 

" . tMPUT õ: IF õrl OR THEN G 


i t 


IP 
= 9 


, ■! 

V, 4 


OR Z >t> 
11 A35IM 


" : INPUT 0: IF 0<1 OR 0>2 
ü TO 1190 

1200 IP M > 0 AND 0 = 1 THENJ 

-1: PRINT "0 ENCANTAMENTU 
EFEITO! : 00 SUB 274-0: L 

H+l- GÕ TÒ 1520 

1210 INPUT "QUE RTRIBUTGa 

PR (2 \ ^ " 1 Z j 0 

1220 IP Z<1 OR 0<1 OR Z>S 
ÜR Z=0 THEN PRINT "ASSIM 

LE...": GO TO 1210 

1230 IP Z = 1 OR 0=1 THEN L 

T+Sl: LET HT=HT+EN . 

124-0 IP Z=2 OR 0=2 THcN L 

T + Hl: LET HT=HT+C‘A 

1250 IP Z =3 OR 0=3 THEN L 

T+Dl: LET HT=HT+DE 

1250 IP Z =4- OR 0=4- THEN L 

T + Il: LET HT=HT + IN 
1270 IP Z =5 OR 0=5 THEN L 


ET M=M 
SURTIU 
T MM=M 


UPI US 


ÜR 0 > 5 

NPü VA 


12 3 0 
T + Sl 
124-0 
T+Hl 
1250 
T+Dl 
1250 
T + 1‘1 
1270 
T+Wl 
1230 

T+Cl 


IP 


IP 


IF 


IP 


IP 


THEN LET HT =M 
THEN LET HT =H 
THEN LET HT =H 
THEN LET HT =H 
THEN LET HT =M 


T+Ul: LET HT=HT + 5B 
1230 IP Z =6 OR O =t> THcN 

T+Cl: LET HT=HT+CO 
1290 PRINT : PRINT H LU 

A“SE P u / 

1300 IP HT >MT THEN PRINT 
UOR.": GO TO 1320 
1310 PRINT "PPUOR DO";L?$ 
1320 LET í<=INT ÍRND*3) 
1330 PRINT Gí; 1 ' - ";HT 


IP 


D THEN LET HT =H 
D 

T ’*p LUTP INIlI 


A-SE 
1300 


PRINT 


EU PA 


134-0 PRINT N$; - > HT: *■ 

1350 IP K =0 THEN PRINT ! U 
NGE-0 CÜH UIOLENCIA": LE. 
1 

1^60 IP K =1 THEN PRINT "0 


PRINT 

unCE ATI 
T HT =HT- 


■ í ‘ 11 
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FERÍU-O!": LET HT=HT-3: 
EN-1: LET CA=Cfi-l 

1370 IF■K =2 THEN PRINT "UOCE 


N = 


Z Lr ■ ' .-c í ncfN rhl 

aflNGRflR O MONSTROí" 


H 


LET MT=MT- 






1 

1 2|0 XF K=3 THEN PRINT "UOCE FOI 

,kE J HT=HT-CINT <RND*3 
f + 1.' : LtT DE=DE-1 

1 ?SS-ír K=4, THEN PRINT "0 ".•Si;" 

. V™ tS 2 U " SE! " : *-ET HT=MT-1 
i.4-00 XF^ K =S THEN PRINT "UOCE PER 

sRNifUE! : LET HT =HT-2: LET SB 

C0=C0-1 

14-10 !F K=S THEN PRINT "UOCE F 
f„O MONSTRO! ". LET MT =MT-1 

nitsScí^-/?? THEN LET K =INT (RND* 
S^r^Me * ;K; ’ DA MRO! “: LET DINH 

EIRO=DINHEIRO-K 

Ji 4 'x2 t rí F =?S D i* 25 RND HT' 10 MT> 

0 TO E Í^20 R T=1 T0 100: NEXT T: G 

nâ-2-.í£., HT>MT THEN PRINT "UOCE C 
ONaEbUIU MRTflR O TEMIUEL" Gi ;" 1 < 

MM =MM + 1; SO TO 1520 

" ;S*;" CONSEGUIU" ; 
LEURR fl MELHOR DESTR UE2!" 




14-60 

*INT 

14-70 

*INT 

14-30 

* INT 
1490 
*INT 
1500 

* INT 
1510 
*INT 
1520 
UB 2 
1530 
1540 


IF 2 = 1 

(c N / 5) 


OR 0=1 THEN 



EN=4 





ÍCfl/4) 

=3 OR 0=3 THEN 
tDE/7) 

, 2=4 OR 0=4 THEN 

(IN/3» 

=5 

í 5 & / õ) 

IF Z=ô 

(CO/6) 

*(SR,3)=0 


=£ OR Q=2 THEN LET CR =3 


DE =6 




OR 0=5 



N LE 


í 


IN =2 


B=5 


OR 0=6 THEN LET CO=3 



40 


RETURN 


PRINT 


GO S 




50 

1560 



1570 

1530 


REM ********** ***** * ** ** *** 
REM *RCEITRR ORDENS* 

INKEY'4 < :> “ " THEN GO TO 15 

PRINT : PRINT "OUE DESEJA F 
“ PRINT 

24=INKEY'4 

IF 24*"'" THEN GO TO 1570 



1590 IF 24="R" THEN PRINT "COBRR 
DE... UIRfl-CflSflCflS...": GO TO 19 
0: REM *RBRNDONAR* 

1600 IF 24="C" RND fl(Sfl.3:i=0 THE 
N PRINT "NRO HA' NINGUÉM COM OUE 
M LUTRR": GO TO 1550: REM *COMBfl 
TER* 

1610 IF 24="C" THEN GO SUB 1010: 
REM *COMBRTER* 

1620 IF 24="G" RND fl<3fl,7)=0 THE 
N PRINT "NRO HO' NRDfi PRRR GURRD 
RR": GO TO 1550: REM *GURRDRR* 
1630 IF 24="L" THEN GO SUB 340: 
REM *LRRGRR* 

1640 IF 24="F" RND RND. 4 RND Ri 
SR,3)00 THEN PRINT "NRO, DEUE F 
ICRR E LUTRR": LET 24="C": REM * 
FUGIR* 

1650 IF 2Í="F" THEN INPUT “EM OU 
E DIRECCRO? ";24 : REM *|-UGIR* 
1660 IF 2S="G" THEN GO SUB 760 
1670 IF 24="N" RND fl(3fi.l)=0 THE 
N PRINT "NRO HR' SRIDR POR RI": 
GO TO 1550 

1630 IF 2S = "5" RND RiSR.2)=0 THE 
N PRINT "NRO HR' SRIDR fl SUL": G 
0 TO 1550 

1690 IF 2$="E" RND fiiSfl,3)=0 THE 
N PRINT "NRO PODE IR NESSR DIREC 
CRQ": GO TO 1550 

1700 IF 2$="0" RND fliSfl,4)=0 THE 
N PRINT "NRO PODE RTRRUESSRR PRR 
EDES": GO TO 1550 

1710 IF 2S=”U" RND flí5fl.5)=0 THE 
N PRINT "NRO PODE SUBIR ROUI": G 
0 TO 1550 

1720 IF 24 ="D" RND fltSfl,6>=0 THE 
N PRINT "NRO PODE DESCER ROUI": 
60 TO 1550 

1730 IF SR =7 RND Ci2)=0 RND 24 = " 
E" THEN PRINT "NECESSITA Dfl CHfiU 
E EM PRRTfl PRRRRBRIR R PORTfi": G 
0 TO 1550 

1740 IF SR=22 RND C(3>=0 RND 24= 
"0" THEN PRINT "NECESSITA Dfl CHR 
UE EM OURO PRRR RBRIR R PORTA": 
GO TO 1550 

1750 IF 24="N" THEN LET Sfl=A(Sfi, 
1) 
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1760 

21 


1770 

3) 

1730 

40 

1790 

6 ) 

1300 

S) 

1310 

1320 

1330 

134-0 

1350 


I 

I 


í = "5" 


THEN LET SR =R \ SR, 


$ = "£*' THEN 


T 3R=R<5fl, 


If 


$= í, 0 11 THEN LET 5A=RíSfl, 


H =H I 


$ = M Ü ,J THEN LET 


I I 

n / 


XF Z$="D" THEN LET 3fl=fiíSfl, 
RETURN 

5ÍÜ ***,****■*#******■*■#■**■*•*■*■* 

REM *INICIflLIZflRí 


CLS 

DIM 


R Í4-3,8) ; DIH CO): DIM 


T$^18,13): DIM M$íi9,13) 


1360 
SR =6 


1370 

1330 

1390 

1900 

1910 

1920 

1930 


ET RELRT =0: 

LET DINHEIRO 
H=3 

ET EN=3*íINT 
ET CR =3*\INT 
ET DE =3* íINT 

ET IN*3*ÍINT 

ET 33=3* íINT 
ET CO=3*(INT 


LET LU =0 


100 


LET MM =0 


REM 

REM 

FOR 

FOR 


ÍRND*6)+ii 
(RND*S)+1) 
ÍRND*6) +i:< 

(RND*& t +1j 
(RND*S)+1) 
ÍRND*S) +i;i 


tofS KHH *********************** 

194-0 REM *DIRECC0ES DR5 FflLflS* 
1950 FOR 3=1 TO 4-3 
1960 FOR C=i Tn 3 
1970 RERD fl(S ; C) 

1930 NEXT C: NEXT 3 

J®?® g£M *********************** 

5 EM ^DISTRIBUIR MONSTROS* 
2010 FOR J=l TO 15 

2020 LET T = INT (RND*4-3) +1: IF T = 

b 0 R T=31 OR T=4- OR T=21 THEN 00 
TO 2020 

2030 IF RíTj3)<>0 THEN GO TO 202 


0 

204-0 
2050 
2060 
2070 
2030 
2090 
õ OR 
2100 
0 

2110 


0 


LtT R(T,3)=U 
NEXT J 

*********************** 
REM ^DISTRIBUIR TESOUROS* 
FOR U =4- TO 13 

i-ET T =INT (RND*4.3>+1: IF T = 


T =31 THEN 00 TO 2090 
IF RÍT # 7)<>0 THEN GO TO 209 

LET R ÍT, 7) =ü 


160 


2120 NEXT J 

2130 REM *********************** 
214-0 INPUT "OUAL E' 0 SEU NOME, 
EXPLORRDOR? *' ,NÍ 
2150 CLS 

2160 REM *********************** 
217.0 REM *TE30URQS /MONSTROS* 

2130 FOR J=i TO 13 
2190 RERD T $ (J) 

2200 NEXT U 

2210 FOR J=1 TO 19 

2220 RERD M$CJ) 

2230 NEXT J 
224-0 RETURN 

2250 REM *********************** 


50 


1 , 4 -, 1 , 3 , 0 , 0 , 0 , 0 


SRLR 


SRLR 

2300 

SRLR 

2310 

SRLR 

2320 


0,5,3/0,0,0,0,0 
3,7,3,2,0,0,0,0 
1 , 0 , 5 , 0 , 0 , 0 , 2,0 
2 , 0 , 0 , 4 -, 0 , 0 , 0,0 

0,0,7,0,0,0,1,0 


REM 

REM 

REM 

REM 

REM 

REM 


2260 DRTR 1,4-, 1,3,0,0,0,0: REM * 
SRLR 1* 

2270 DRTR 0,5,3,0,0,0,0,0: REM * 
SRLR 2* 

2230 DRTR 3,7,3,2,0,0,0,0: REM * 
SRLR 3* 

2290 DRTR 1,0,5,0,0,0,2,0: REM * 
SRLR 4.* 

2300 DRTR 2,0,0,4-,0,0,0,0: REM * 
SRLR 5* 

2310 DRTR 0/0,7,0,0,0,1,0: REM * 

SííLjpi ^ 

2320 DRTR 3,14-, 15,6,0,0,1,0 : REM 
*SRLR 7* 

2330 DRTR 1,3,3,3,0,0,0,0: REM * 
SRLR 3* 

234-0 DRTR 10,11,0,0,0,0,0,0: REM 
*SRLR 9* 

2350 DRTR 0,0,11,9,0,0,0,0: REM 

2330 DRTR 9,13,12,10,0,0,0,0: RE 
M *5RLR 11* 

2370 DRTR 0,0,0,11,0,0,0,0: REM 

2330 DRTR 11,16,0,4-4-, 0,0 , O , 0 : RE 
M íSflLfl 13# 

2390 DRTR 7,0,0,0,0,0,0,0: REM * 
SRLR 14-* 

24-00 DRTR 7,4-5,0,12,0,0,0,0: REM 
*3RLR 15* 

24-10 DRTR 0,19,0,17,0,37,0,0: RE 
M *SRLR 16* 

24.20 DRTR 0,0,16,0,0,0,0,0: REM 
*SRLfl 17* 


3 , 14-, 15,6,0,0,1,0: REM 
1,5,3,3,0,0,0,0: REM * 
10,11,0,0,0,0,0,0: REM 
0,0,11,9,0,0,0,0: REM 


1 * 




24.30 DATA 0,30,0,0, 0 ,34-, 0,0: 
íSflLfl 13* 

24.4.0 DflTR 16,23,0,0,0, 4.3 ;0;0 
H *SRLR 19 * 

24.50 DRTR 0,31,22,0,0,0,0,0: 
*5RLR 20* 

2480 DRTR " 0 ,23,0,4-5,0,0,3,0: 


REM 


R 


REH 


REM 


M 

R 


*SRLR 21* 

24.70 DRTR 0,24,0,20,0,0,0,0; REM 
*5RLR 22* 

2430 DATA'21,25,0,0,0,0,0,0: REM 
*5RLR 23* 

24.90 DATA 22,0,25,0,0,0,0,0: REM 
*5RLR 24* 

2500^ DATA 23,27,30,24-, 0,0,0,0: R 
EH *5RLR P5* 

2510 DATA 0,0,27,0,0,0,0,0: REM 

2520 DATA 25,0,0,26,0,0,0,0: REM 
*SRLR 27* 

rIm^SALA -si 23 '26,28,0,47,0,0: 

254.0 DATA 26^23,29,29,0,0,0,0: R 


EM «SALA 29*-- - 

2550 DATA 13,0,0,25,0,0,0,0: REM 

3É3# 

2560 DATA 20,0,0,0,0,0,0,0: REM 

31$ 

2570 DRTR 0,0,34,0,0,47,0,0: REM 

2530 DATA ”34., 38,0,35,0,0,0,0: RE 

aS90^DftTA^34., 33,34-, 32,13,8,0,0: 
REM «SALA 34-* 

2600 DATA 33,38,36,0,0,0,0,0: RE 

M Ü 

2610 DATA 33,39,4-6,35,0,0,0,0: R 

EH *5RLR 36* 

2620 DATA 0,4-0,0,0,16,0,0,0: REM 
^SflLfl 37# 

2630 DATA 35,0,0,0,0,4-1,0,0: REM 

#SALA 33# 

264-0 DATA'36,39,40,39,0,0,0,0: R 

EM xSPI £5 -"íüi 

2650 DATA 37,0,0,39,0,0,0,0: REM 
*5RLfl 40* 

2660 DATA 0,0,42,0,33,0,0,0: REM 

# s in L ^ ^ ^ 

2670 DATA 42,43,42,41,0,47,0,0: 


H 
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REM *SALA 42* 

2630 DATA 0,0,42,0,19,0,0,0: REM 
*SALA 43* 

2690 ReM *********************** 
2700 REM «TESOUROS/M0N5TRDS* 

2710 DATA '‘ARCHOTE" , “CHAUE EM PR 
ATA","CHAUE EM OURO","ESPADA","M 
ACA DE ARMAS","COTA DE MALHA","E 
SCUDO","MANTO PROTECTOR","BOLAS 
DE FOGO" 

2720 DATA "ESMERALDAS","ANEIS DE 
PRATA", "JOIAS ELEMENTARES", "DIA 
MANTE5","OLHOS DE DRASAO","BOLA 
DE CRISTAL","GEMAS DE DUENDE","P 
EDRA5 DEF0RHANTE5”,"DOBROES DE O 
URO" 

2730 DATA "GARGULO","GALGO DEMON 


IACO","MAGO DIABOLICO' 


I li ; 


AGARTO 


DE FOGO","DRAGAO DO GELO","ARANH 
AO","DRACÜLINO","GORGONZO","HOME 
M-URSO", "NIGROMANTE" ,"PATRIARCA" 
,"GIGANTE PREDADOR","UEGETAL DAN 
CARINO","ANAO DE 10 CABECAS”, "ME 
STRE LADRAO","UERHE PETRIFICADO" 
, "ARANHIÇO UGRAZ","DUENDE PEDANT 


FOP 


CEIRO NEGRO" 

1=1 TO 50: NEXT 


E","FEITICEIRO NEGRO" 

2740 FOR 1=1 TO 50: NEXT I: RETU 
RN 

2750 REM 

2760 REM «SALA 1* 

2770 PRINT "UOCE ENCONTRA-SE JUN 
TO A UM RIO" 

2730 PRINT "SUBTERRÂNEO." 

2790 IF RND> . 5 THEN PRINT "EXIST 
E UMA SAIDA PARA OESTE." 

2300 IF RND >.5 THEN PRINT "UH TU 
NEL CONDUZ A SUL." 

2310 RETURN 

2320 REM *********************** 
2330 REM «SALA 2* 

2340 PRINT "ESTA" NA AREA DE ABA 


REM ■ 4 

D PM i X 

PRINT - "UOCE ENCONTRA-SE JUN 
UM RIO" 

PRINT "SUBTERRÂNEO . " 

IF RND>.5 THEN PRINT "EXIST 
SAIDA PARA OESTE." 


2340 PRINT "ESTA" NA AREA DE ABA 

STECIMENTQ" 

2350 PRINT "ALIMENTAR DA CIDADEL 
A» " 

2360 PRINT "UE QUEIJOS, PAES DE 
COR ESCURA," 


2370 PRINT " 


MUITOS SACO 


COM O 


UTRO 


PRODU-TOS." 
RETURN 
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c390 REM ***4.****s$*4.** **** * * * * * 
£900 REM *SRLfl 3* 

£910 PRINT "ENCONTRA-SE NR5 COZI 
NHRS DR Cl- DRDELfl," 

2920 PRINT "UE UM ENORME PEDAÇO 


DE CARNE Rü-DANDO LENTAMENTE 5*3 
RE O FOGO." 

2930 PRINT "EXISTEM PORTAS PARA 
OESTE E SUL," 

294-0 PRINT "ALEM DAS QUE D A Ü ACE 
SSO A ARMA- RIOS," 

2950 RETURN 

2960 REM -$■ -4 -4 4- 4- 4 4- 4- 4- 4 4- 4 4- 4 4- -4 4- 4- 4- 4. -4 4- 4. 

_ _ __ _ t .* ** *' " “ -* '■ ^ K 11 ' * " ^ 

2970 REM *3ALA 4* 

?222~ PRir4T "ESTA" NA BIBLIOTECA 
CENTRAL," 

2990 PRINT "AS PAREDES ESTAÜ **S 
ERTAS DE UO-" 

3000 PRINT "LUMES ENCADERNADOS t 
ATINGINDO O" 

3010 PRINT "TECTO ORNAMENTADO." 
3020 RETURN 

3030 REM ****4.4.******-4*.£**4.4.4.*4 * 
304.0 REM *5RLR 5* 

3050 PRINT "UMA SALA COMPLETAMEN 
TE DESAPRU- MADA." 

3060 PRINT "FOI O ESTUDin DE HM 
ARTISTA." 

3070 PRINT "POR TODO n LADH iíf.s 
E TINTA E" ‘ 

3060 PRINT "TELAS UELHA*." 

3090 RETURN 

3100 REM ********** 

3110 REM *SRLR 6* 

3120 PRINT "ESTA" NA ENTRADA DA 
CIDADELA DE PERSHU." 

3130 PRINT "AFASTE-SE EM3UANT0 E 
' TEMPO; ” 

3140 PRINT "MUITOS MAIS FORTES D 
O QUE UOCE AMEDRONTARAM-SE FREN 
TE A ESTAS TORRES AMEAÇADORASí" 
3150 PRINT "SE POREM INSISTE NA 
SUA TEMERI- DADE , AUANCE PARA O 
PORTÃO NEGROA ESTE,.," 

3160 RETURN 

3170 REM * * * * * * * * * * * * * * * * * * * * * * * 
3130 REM *SRLA 7* 

3190 PRINT M A MEIO DA SALA ENCON 
TRA-SE UM ALTAR EM PEDRA t E 50 


T 


A 


* w r 
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BRE ELE DUASUELAS APAGADAS." 

3200 PRINT "NUt-ifl DAS EXTREMIDADE 
S DO ALTAR" 

3210 PRINT "ESTA'' UM LIURO ANTIG 
O , COBERTO" 

3220 PRINT "POR UM UELHO PERGAMI 
NHO. " 

3230 RETURN 

324.0 REM *********************** 
3250 REM «SALA 3« 


3260 PRINT 


UOCE ESTA 


AGORA NO 


TOPO 

3270 

DELA 


DA TOR-RE NEGRAj" 

PRINT "'A SUA UOLTA, A CIDA 


PRINT 


XISTE APENAS UMA SA 


URN 


3230 PRINT "DE-SE PARA NORTE; SU 
L E ESTE." 

3290 PRINT "EXISTE APENAS UMA SA 
IDA. " 

3300 RETURN 

3310 REM *********************** 
3320 REM «SALA 9« 

3330 PRINT "ENCONTRA-SE NA ZONA 
NORTE DAS GRANDES ADEGAS DA Cl 
DADELA." 

334-0 PRINT " ' A SUA UOLTA UE PESA 
DOS BARRIS DE UINHO." 

3350 PRINT "EXISTE UMA PORTA PAR 
A NORTE E" 

3360 PRINT "OUTRA PARA SUL." 

3370 RETURN 


•A SUA UOLTA UE PESA 
DE UINHO." 

EXISTE UMA PORTA PAR 


"OUTRA PARA 


UL. " 


3330 REM *********************** 
3390 RtM «SALA 10* 

34-00 PRINT "ESTA' NA ALA OESTE D 
AS ADEGAS." 

34-10 PRINT "EXISTE UMA PORTA PAR 
A OESTE E OUTRA PARA ESTE." 
34-20 PRINT "A PARTE CENTRAL, CIR 
CULAR DRS" 

34-30 PRINT "ADEGAS E' ACEDIDA PE 
LA PORTA ESTE." 


34-4-0 RETURN 

34-50 REM *********************** 
34-60 REM «SALA 11* 

34-70 PRINT "ENCONTRA-SE NA AAEA 
CENTRAL DAS" 

34-30 PRINT "ADEGAS." 

34-90 PRINT "EXISTE UMA PORTA EM 
CRDR DIREC-" 

3500 PRINT "CRO DR BU5SÜLR" 
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RETURN 

REM *********************** 
REM *SRLA 124 

3S40 p RINT "UOCE ESTA' NR RLR ES 
Dfl ADEGA." 

_ n-.RR 1 ^ "EXISTE UMA PORTR PRR 
O' PODE^SR -"^ 0 ° ESTE ‘ MflS 3 

3 ®£0 Ê-tST " _LR PflRfl ENTRAR onde 

'JH E STH 9 

RETURN 

R g£j *********************** 

3600 REM *5RLR 13* 

3610 PRINT "NESTA SECÜAO SUL DAS 




GARRAFA 




ADEGAS, UO-CE UE MUITA 
S DE UINHO" 

PRINT "DEITADAS DE LADO NO 
SUPOR-TES." 

3 &ã?,,5Ç IN I« !'OBSERUA UMA ABERTURA 

ESUURA, DE ASPECTO DESAGRADAUEL 

3 ?4? PRINT "E PORTAS A NORTE E A 
SUL * 

RETURN 

■*i=-r™ 5Í2 *í“í******************** 

3b710 REM *5RLR 14-* 

?§ 3 S- l P ?ÍÍÍI "ENCONTRA-SE NR RRMRR 
IR DR CIDR- OELR," 

PRINT "PODE UER FILRS INTER 





BRILHANTES 



MINAUEIS DE" 

3700 PRINT "RRMRDURR 
E RRMRS DE" 

3710 PRINT "MUITOS TIPOS," 

RETURN 

2Z?§ §£m *********************** 

374-0 REM *5ALA 15* 

2ín= SSÍflX ” yoCE ESTA- NOS APOSE 

NTOS PRIUA- £>Q 5 £>Q REI, 1 ' 

3 , 7 Ü=ÇSÍ NT " Nfl PfiREDE sul ue uma 

?gg?S:~ no Lmo Dfl ÍU 

^Rr/norTe^* 15 ™ " INM SflIDn 
37S0 PRINT "E PARA 
3790 RETURN 

3333 5IÍ1 *********************** 

3810 REM *SALA 16* 

PRINT "ESTA CURIOSA SALA TE 




M O PAUIMEN-TO COBERTO DE AREIA- 

I I 

3830 RETURN 

334.0 PRINT “DE UMA PORTA A SUL." 
3350 PRINT "NAO SABE POREM SE UI 
U TODAS AS SAÍDAS...” 

3360 RETURN 

3370 REM *********************** 
3330 REM *SALA 17* 

3390 PRINT "ENCONTRA-SE NA GALER 
IA DOS QUA- BROS." 

3900 PRINT "AS PAREDES ESTÃO COB 
ERTAS DE RE-TRATOS DE PRÍNCIPES 
HA' MUITO FALECIDOS." 

3910 PRINT "A SALA E' DOMINADA P 
OR UMA ENOR-ME PAISAGEM, COLOCAD 
A SOBRE A" 

3920 PRINT "SAIDA PARA ESTE, QUE 
CONDUZ, PE-LA PASSAGEM DOURADA, 

- A SALA DA AREIA." 

3930 RETURN 

394-0 REM *********************** 
3950 REM *SALA 18* 

3960 PRINT "UOCE ESTA' NA UARAND 
A DE UMA" 

3970 PRINT "TORRE." 

3930 IF RND>.5 THEN PRINT "PASSA 
UM MORCEGO JUNTO A SI, GUINC 
HANDO..." 

3990 PRINT "UE UMAS ESCADAS..." 
4-000 RETURN 

4-010 REM *********************** 
4-020 REM *SALA 19* 

4-030 PRINT "UOCE CAMINHA SOB UMA 
ARCADA DE PEDRA." 

4-04-0 PRINT "SÓ' PODE DIRIGIR-SE 
pppp NORTE" 

4-050 PRINT "OU PARA SUL, A MENOS 
QUE DECIDA" 

4-060 PRINT "SAIR PELAS ESCADAS." 
4-070 RETURN 

4-030 REM *********************** 
4-090 REM *SALA 20* 

4-100 PRINT “ESTE UASTO ATRIO POS 
SUI UM PA- UIMENTO EM MÁRMORE, 
PRODUZINDO" 

4-110 PRINT "UM ENORME ECO AO MEN 
OR RUIDO." 

4-120 PRINT ”AS SAÍDAS ESCONDEM-5 





E ATRAS DE" 

COR 0 pURPURfl'^ ESflI>flS C0RTINfl5 DE 
4-14.0 RETURN 

4-160 REM *SALA 21". ********** 

EM 7 DE P Lütífls‘ ,ENCÜNTRR_:5E N0 flRMRZ 

dÍ^CALOrT "’' 0 P ° RTR R 0ESTE IRRfl 

+ PORTfl RÍ áuE ;:UE flINDR ÜMR SEGUNDfl 

íiio return* ,CONDUZ * SUL ‘" 

4 I 30 rIm *:|ala* 22 ****** # ******** 

nde 0 se R ÍuSr_- üce èstr " Nfl RRER 0 

4-250 PRINT "DRM RS CRUZES EM PRR 

55ÍÍIX- 'OLHANDO 'R 5UR UOLTA 
/ UE APENAS" ” 

4-^70 PRINT "DUAS SRIDRS," 

4-230 RETURN 

■f290 REM JHHHHíííutmiuíí 
4-300 REM *SRLA 23*. *•.*»***** 

4-310 PRINT "ENCONTRA-SE flpnpa «n 
RRMRZEM DE" OL - hl-urr 

4^20 PRINT "AMULETOS.” 

4-330 PRINT "EXISTEM PORTAS rn*lDn 
ZINDO fi NOR-" t-UKiHS UU,'Il-U 

tlí? PRÍNT "TE E R SUL." 

4350 RETURN 

4360 REM ****^**-»*******ííííí.ívv 
4370 REM *SRLR 24*. *********** 

z1^ 0 d§ R ^I"" entrou flG0R,:i f '- ,C! ARMA 

4390 PRINT "CIDOS." 
flO? 0 CONSEGUE" P£SRR DR &E3ARRUMRC 

ííal retÍ1rn" ,J£R ours P0RTR5 -" 

4-4-30 REM v 

4440 REM *SRLR 2SÍ . *********** 

MRLRS?" 1NT “ ESrfl7 "N0 RRMRZEM DE 

4490 W RETURN 

4-500 REM * * ** ^ * * * * * * * * x s, -i x. * ^ v 
4510 REM *SRLR 2l* 
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4520 PRINT "ESTfl 
EIO DE CRI-" 

4530 PRINT "XRS 
HflDflS RTE"" 

4540 PRINT "RO T 
4550 PRINT "EXI5 


" NUM RRMRZEM CH 
DE MRDEIRR EMPIL 


TO. . . " . 

M DURS 


SAIDAb. 


4560 RETURN 

4570 REM *********************** 
4s30 REM *SRLfl 27* 

4590 PRINT "£' AQUI QUE SE GURRD 
RM RS PORCE—" 

460o"pRINT "LRNRS PINTADAS. COMO 
E' FRCIL" 

4610 PRINT "UER..." 

4520 PRINT "UOCE MOUE-SE COM CU-I 
DRDO..." 

4530 RETURN 

4540 REM *********************** 


I I I 


4630 RETURN 

4640 REM *********************** 
4650 REM *SRLR 23* 

4560 PRINT "O RR PESADO DESTA RR 
ER PARECE- -LHE DIMINUIR R LUZ 

DO SEU RR- CHOTE_" 

4670 PRINT "COM DIFICULDADE, RPE 
RCEBE-SE DE QUE O RR UEM DE UM P 
ONTO flCIMfl DE SI..." 

4630 PRINT "OCORRE-LHE QUE TflLUE 
Z ISTO SEJA" 

4590 PRINT "UMA E5PECIE DE MINA. 


4700 RETURN 

4710 REM *********************** 
4720 REM *SRLR 29* 

*-730 PRINT "PARECE TRATAR-SE DE 
UM LABIRINTO" 

4740 PRINT "INTERMINAUEL, COM AS 
PAREDES RE-DE3TIDAS DE PINTURAS 


4750_ j PRINT "QUALQUER QUE SEJA A 

4760 _ PRINT "APENAS UE TÚNEIS..." 
4770 RETURN 

4730 REM *********************** 
4790 REM *SALA 30* 

4300 PRINT "CHEGOU 'A TORRE SUL 
DR CIDADELA." 

4340 RETURN 

4350 RcM *********************** 
4350 RcM *SALA 31* 


tJA A 


UE TÚNEIS... 
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4-870 PRINT "OPTIMO, CONSEGUIU DE 
5C0BRIR R" 


RIDR Dfl CIDADELA! 


RESPIRE FUNDO, SINTR 


RR. . . " 


4.380 PRINT "SRIDA Dfl CIDRDELR!' 
4-390 PRINT "RESPIRE FUNDO, SINTR 
fl FRESCURR" 

4900 PRINT "DO RR..." 

4910 RETURN 

4920 REM *********************** 
4930 REM *SALR 32* 

4940 PRINT "ESTR SRLR ESTR' CHEI 
R DE FUMO " 

4950 PRINT "PELO OUE NRO CONSEGU 
E UER BEM." 

4960 PRINT "O FUMO SRI DE UMR ES 
TRTUR NO CENTRO DR SRLR." 

4970 PRINT "ENCONTRA-SE CERTflMEN 
TE NUMR CR- MRRR RELIGIOSA..." 
4930 RETURN 

4990 RcM *********************** 

5000 REM *SRLR 33* 

5010 PRINT "UMR PEOUENR PONTE PE 
RMITE RTRR—" 

5020 PRINT "UESSflR ROUI UM RIO," 
5030 PRINT "PODE CONTINUAR PRRR 
NORTE, SUL" 

5040 PRINT "OU OESTE." 

5050 RETURN 

5060 REM *********************** 
5070 REM *SRLR 34* 

5080 PRINT "ENCONTRA-SE NUMR GRU 
TR, COM DE-" 

5090 PRINT "GRRUS ESCRUADOS NA P 


EDRR CONDU- ZINDO fl UM PISO SUPE 

RIOR , " 

5100 PRINT "EXISTE TRMSEti UMR PO 

RTR RTRR^ES" 

5110 PRINT "DR OURL 5E PODE SRIR 
DR GRUTR," 

5120 RETURN 

5130 REM ****** ***************** 
514-0 REM *SRLR 35* 

5150 PRINT "ENCONTRR-SE N05 RNTI 
005 E5TRBU-" 


M UMR PO 


RIR 


NO 


RNTI 


5160 PRINT M L05 5U5TERRRNE05 DR 
CIDRDELR. " 

5170 PRINT "CHEIRA HORRIUELMENTE 
MAL ROUI; " 

5130 PRINT "E■' MELHOR RPRESSRR-S 

E. " 
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5190 RETURN 

5200 REM *********************** 
5210 REM *SRLA 36* 

5220 PRINT "ATINGIU UMR E5PECIE 
DE URRDIM SUBTERRÂNEO." 

5230 PRINT "CERCRM-NO ARUORES ES 
TRRNHRS " 

5240 PRINT "TORCENDO-SE SOBRE SI 
PROPRIRS E" 

5250 PRINT "DE ESTE SOPRR UM UEN 
TO INCRIUEL-MENTE FRIO." 

5260 RETURN 

5270 REM *********************** 
5280 REM *SRLA 37* 

5290 PRINT "ESTR' NR SRLR DO ORA 

CULO, ONDE fl" 

5300 PRINT "UOZ MISTICfl JR' NRO 
SE OUUE PO- REM HR' MUITOS RNOS. 


W f 


5310 IF RND >.3 THEN PRINT "MAS fl 
GORA SUSSURRA OUE EXI5TE ROUI 
UMR PORTfl SECRETA!" 

5320 IF RND>.7 THEM PRINT "fl UOZ 
MURMURA RLGD SOBRE R PORTAR SUL 


5330 RETURN 

5340 REM *********************** 
5350 REM *SRLfl 38* 

5360 PRINT "HORROR! UOCE SENTE C 
RLRFRIOS" 

5370 PRINT "OUflNDO COMPREENDE OU 
E ESTR E' R SRLR DE SACRIFÍCIOS. 

I I 

5330 PRINT "0 CHRO ESTR-' MRNCHRD 
0 DE SANGUE" 

5390 PRINT "SECO, E UM CRANEO PA 
RECE SORRIR—LHE DO ALTO DA PARE 
DE..." 

5400"RETURN 

5410 REM *********************** 
5420 REM *SALA 39* 

5430 PRINT "UELHOS BELICHES, E C 
ORRENTES PRESAS 'AS PAREDES, 
INFORMAM-NO" 

5440 PRINT "DE OUE SE ENCONTRA N 
AS ANTIGAS MASMORRAS..." 

5450 IF RND>.4 THEN PRINT "UMA P 
EQUENA PORTA CONDUZ A NORTEE OUT 
RA A ESTE." 







R 


MASMORRA 


PARECEM 
RRERS 5 


1 I 


54-60 PRXNT "AS MASMORRAS PARECEM 
EXTENSAS , COM PEQUENAS AREAS S 
EPARADAS PORDIUISORIAS..." 

54-70 RETURN 

54-30 REM ********** ************* 
54-90 REM *SALA 4-0* 

5500 PRINT "ENCONTRA-SE NUMA PEO 
UENP 5PLFI ” 

5510 PRINT M COM UM SOLIDO TRONO 
DE GRANITO P" 

5520 PRINT "MEIO,./ 1 
554-0 RETURN 

5550 REM *ííííííí*í-í*í***T**i**T 
5560 REM *SPLP 41* 

5570 PRINT “ESTP' NP SPLP DOS CP 

RCEREIROS" 

5530 PRINT "ORCS , MUITO ABAIXO D 
0 SOLO...” 

5590 PRINT "TERMINA AQUI UMA ESC 
ADA E EXIS—" 

5600 PRINt'‘"TE UMA PORTA PARA ES 


5610 RETURN 

5620 RcM *********************** 
5630 PeM *SALA 4.P* 

5640 PRINT "EXISTE AQUI UMA NASC¬ 
ENTE CURATI-" 

5650 PRINT "Ufl, MAGICA," 

5660 PRINT "A AÔUA MOUE-SE PERIG 
OSAMENTE EM" 

5670 PRINT "TORVELINHOS. " 

5630 RETURN 

5690 REM *********************** 
5700 REM *SALA 43* 

5710 PRINT "OS SACERDOTES DE ODR 
IC USAUAM” 

5720 PRINT "ESTE PEQUENO ATRIO P 
ARA O SEU CULTO PROIBIDO HA' M 
UITOS EONSI" 

5730 PRINT "£• UMA AREA DESAGRAD 
AUEL, PELO QUE UOCE SE SENTE AL 
EGRE PD DFí — 11 

5740 PRINT "COBRIR H EXISTÊNCIA 
DE UMAS ES- CADAS EM PEDRA," 

5750 RETURN 
5760 PEM 

» 4 ™ H f ■ F I h -c t h* 4V d i | ■ ^ w r * a ■ ■ h - > r * * r t- i f n i f ■ * i t « ■ 

5770 REM *SALA 44, MORTE POR AFO 
GAMENTO* 

5730 PRINT "UOCE SENTE-SE MERGUL 


= I I 
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HPR NP PGUP!" 

5790 GO SUB 274.0 ^ 

5300 PRINT "ESTPP PFÜGPR-*£! ! 

GO SUB 274-0 __ 

5310 PRINT Jí GLUB ■ . . 6LUS . - - bPRf- 


5320 


534-0 


RETURN 

REM ********************** 
REM *5PLP 4.5; MORTE POP. OU 



IMPDURP * . _,, _ 

5350 PRINT “PS CMPMPS PPRüxIMPM 



5360 GO SUB 274-0 

R370 PRINT “O SEU CORPO E' OUEIM 
PDO LENTP- MENTE!": GO SUB 274-0 
5330 IF RND>.7 THEN GO TO 5360 

5390 RETURN 

5900 REM *********************** 
591Ü REM *5RLP 46; PETRIFICAR*. 
5P20 PRINT “UOCE E' PTINGIDO PuR 

UMP PNTIGP" _ 

5930 PRINT “MPLDICPO; E TRRNoFOR 

MPDO NUM" 

5940 PRINT “BLOCO DE PEDRPí 1“ 
5950 PRINT “E ‘ O SEU FIM..." 

5960 RETURN 

5970 REM *********************** 
5930 REM *SPLP 47; POCO PEM FIM* 

59P0 PRINT “UOCE TROPECP NUM POc 
O SEM FIM!" 

6000 GO o UB 274-0 ____ 

fia10 PRINT “SENTE-SE CPIR; uPIR* 


5900 

5910 

5920 

UMP 

5930 

MPDO 


5930 


6020 IF RND>.4 THEN GO TO 6000 
6030 RETURN 
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XXI 

AUMENTAR O INTERESSE 


Finalmente, resta-nos considerar alguns modos de aumentar o 
interesse dos nossos programas. 

Os dois objectivos mais óbvios a atingir nos nossos programas 
são (a) a imprevisibilidade e (b) a estabilidade. Estas duas carac¬ 
terísticas parecem talvez excluir-se uma à outra, mas tal não 
acontece. A imprevisibilidade refere-se ao desconhecido que o 
jogador deve enfrentar ao atravessar os planaltos rochosos das 
suas aventuras. A estabilidade refere-se ao ambiente que deve ser 
suficientemente estável e coerente para poder ser traduzido nu¬ 
ma planta, a menos que você próprio tenha tomado uma decisão 
em contrário (por exemplo se empregar um mago que faça deslo¬ 
car as paredes sempre que você roda a cabeça...). 

“A onstrução das plantas é um dos maiores prazeres dos pro¬ 
gramas de aventuras” (Tim Hartnell). O leitor deve pensar sem¬ 
pre nisto. Como já compreendeu certamente, a criação de uma 
planta e de uma tabela de movimentos constitui o aspecto central 
da programação de uma aventura. Tudo o resto são comentá¬ 
rios... 

Se o seu mapa (e a tabela de movimentos) estiver certo, tudo o 
resto acabará por adaptar-se ao que você pretende. 

No início do livro referi-me à "‘programação estruturada”, 
começando o seu programa de aventuras (ou aliás qualquer ou¬ 
tro) de cima para baixo, definindo primeiro os traços gerais e só 
depois passando aos pormenores. 

Depois de ter conseguido correr o seu programa satisfatoria¬ 
mente, obrigando o jogador a deslocar-se no ambiente por si 
criado de acordo com o seu mapa e a usar as rotinas de “recolher 
objectos”, “largar objectos”, etc... do modo previsto, pode co¬ 
meçar a elaborar a sua obra-prima. Este último capitulo destina- 
-se precisamente a referir algumas ideias que pode incluir no seu 

programa básico. 
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Objectivo 


Deve haver alguma razão para o jogador se lançar á aventu¬ 
ra'; Escreva um pequeno cenário explicando onde e porquê se 
realiza a sua aventura. Dê ao jogador um objectivo realista (por 
exemplo, sobreviver até conseguir fugir, como nas aventuras an- 
leriores), como descobrir o Corno Dourado e trazê-lo para casa, 
bater o actual recorde do Clube Americano de Caça aos Mons¬ 
tros de 342 bestiúnculas mortas numa única sessão, salvar a bela 
princesa presa pelo Dragão na Torre Negra, etc. Torne bem cla¬ 
ro este objectivo, e garanta que uma percentagem significativa 

dos actos do ou da jogadora tenham a ver com a realização desse 
objectivo. 


Carácter do jogador 


Em vez de deixar o computador definir as características ini¬ 
ciais do jogador (atribuindo-lhe x pontos de inteligência e y de 
força bruta, mas apenas z de poder mágico), talvez possa permi¬ 
tir ao jogador construir o seu próprio personagem antes de se 
lançar na aventura. Executar a mesma tarefa com personagens 
diferentes pode ser bastante interessante. O leitor deverá eviden¬ 
temente introduzir algumas limitações na escolha desses atribu¬ 
tos, a íim de impedir algum jogador mais sovina de recolher pa¬ 
ra si próprio todos os pontos disponíveis para os próximos dez 

mil jogos... Dentro em pouco não restaria nenhum monstro, es¬ 
magado por um tal adversário! 


Experiência 


Talvez o leitor deseje introduzir a possibilidade de guardar o 
estado actual da aventura em fita magnética, a fim de permitir 
ao jogador continuá-la noutra ocasião. A “experiência’’ do jo¬ 
gador (os seus atributos, o dinheiro que possui, as armas, etc.) 
deverá ser igualmente gravada em fita, juntamente com as ou¬ 
tras características da situação em que o jogador se encontra. 


Objectos 

Não se limite apenas a algumas espadas e machados. Utilize a 
sua imaginação para inventar todas as mercadorias que possam 
dar colorido ao jogo. A corda é por vezes muito útil. Deixe o jo¬ 
gador prender uma ponta da corda numa sala, porque seis salas 
mais tarde deverá descer um precipicio usando-a (tal como a 
chave em prata é necessária para abrir a primeira porta fechada 
da Cidadela). Dentro em pouco o próprio jogador descobrirá 
quais os artefactos que lhe serão mais úteis. 


Magia 


Nos jogos “reais”, as lutas e o uso de encantamentos mágicos 
são dois dos “pratos fortes”. Dada a imensa variedade de en¬ 
cantamentos que podem ser imaginados (desde abrir um buraco 
no chão debaixo dos pés do inimigo até transformar-se em caná¬ 
rio e cantar até os monstros perderem o juízo), é extremamente 
difícil programar o computador de modo a responder à magia 
do mesmo modo que os árbitros humanos dos jogos de fantasia, 
No entanto, utilizámos já nos nossos jogos dois tipos de magia 
(tele-transporte, vitória em combates), e não há qualquer razão 
que impeça a inclusão de outros tipos. Talvez possa permitir ao 
jogador escolher os encantamentos num menú apresentado no 
início do jogo, antes de saber quais os problemas que irá encon¬ 
trar pela frente. Os efeitos de cada encantamento podem ser in¬ 
dicados no programa ou em notas à parte. 


Vocabulário 

Releri-me neste livro ao facto de muitos programas de aventu¬ 
ras terem um vocabulário bastante extenso. Ou seja, esses pro¬ 
gramas parecem “entender” aquilo que lhes diz. O leitor pode 
facilmente incorporar nos seus próprios programas um vocabu¬ 
lário mais elaborado do que o apresentado neste livro, mas deve 
definir inicialmente algumas “regras de uso”. Em geral, a sinta¬ 
xe é limitada (normalmeme a duas palavras, como GUARDAR 
MACHADO , SUBIR ESCADA). Não é difícil, como já sugeri, 
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levar a máquina a reconhecer que PEGAR, GUARDAR e RF- 

COLHER significam a mesma coisa. O seu “reconhecedor de 
palavras deve poder dividi-las {em GUARDAR e MACHA¬ 
DO), de modo a compreender que a primeira ê uma ordem, e a 
segunda o objecto dessa ordem. Parte do interesse dos progra¬ 
mas e aventuias consiste precisamente em descobrir quais as 
palavras que reconhecem. Você deve incluir algum modo de re- 
jeítar as palavras que a máquina não compreende. A frase aqui 
usada deve ser estudada cuidadosamente. Uma linha como 

“NÃO SFf^OMot A 7 CD á bons „ resultad “. mas outras como 

COMO hAZER ISSO” (como já vi em vários pro- 

?i ra j lias apenas convida o jogador a escrever obscenidades no te- 

ClãÜO.,, 


Limites 


Atribua um peso a cada objecto, e informe o jogador de que a 
sua força tem limites. O jogador será assim forçado a decidir se é 
me or esprezar a cota de malhas a fim de transportar um 
maior numero de objectos mágicos, ou o contrário. 


Investigação 


Arranje aiguns volumes de histórias populares, contos fantás¬ 
ticos, etc. As antigas descrições de combates dar-lhe-ão muitas 
ideias sobre o modo de construir o terreno, as armas a usar, as 
reacções do inimigo, etc. Cada frase desses livros pode sugerir 
uma nova aventura... O momento e o local são muito importan¬ 
tes para a criação do ambiente da sua aventura. 


Extras 

Alem de oterecer ao jogador alguns objectos espalhados pelo 
erreno, o leitor pode introduzir nos seus programas um número 
de objectos superior ao que usámos nas aventuras deste Ihro 
Que tal um pequeno grupo de mercenários que possam ser sacri¬ 
ficados como comida para dragão, ou um burro para carregar os 

objectos de que precisa? 
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Trajeclos alternativos 

Se um dos objectivos do programa de aventuras è recolher 
tantas riquezas quanto possível, talvez convenha dar ao jogador 
a possibilidade de recuar de vez em quando de modo a guardar 
os tesouros recolhidos num local seguro. Um grupo de bandidos, 
escondidos na sala 34, roubará provavelmente tudo aquilo que o 
jogador transporta, pelo que se alguns dos tesouros já tiverem si¬ 
do escondidos não se perderá tudo. 


Limites de tempo 

Se lhe parece que algumas das suas aventuras são demasiado 
simples, melhore-as incluindo um relógio no programa, se possí¬ 
vel imprimindo as horas no visor. Isto contribuirá para aumen¬ 
tar a pressão, acrescentando um novo motivo de interesse. 


Clima 

Talvez deseje acrescentar alguns elementos climáticos no seu 
programa. Uma sala muito fria significa que o jogador deve in¬ 
cendiar qualquer coisa para sobreviver. Uma outra sala poderá 
ser enchida de vapor, enferrujando as espadas mas deixando os 
machados em bom estado. Um solo escorregadio pode introdu¬ 
zir algumas complicações interessantes. O leitor certameiue con¬ 
seguirá inventar outras situações deste tipo. 

Vejamos finalmente algumas ideias que talvez lhe interessem: 

— Um monstro que não se mantém passivamente numa dada 
sala, mas segue o jogador incansavelmente depois de este o ter 
acordado. 

— Alguns outros “pseudo-jogadores” sob comando do com¬ 
putador que parece estar também a explorar o ambiente. O joga¬ 
dor pode encontrá-los de vez em quando, talvez obtendo assim 
algumas informações. 

— Uma ordem “socorro” que o jogador possa utilizar quan¬ 
do está completamente perdido. O uso desta opção pode, no en¬ 
tanto, acarretar um castigo qualquer. 

— As portas podem estar fechadas ou incluir ratoeiras. As pa- 
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redes podem cair sobre os jogadores, os pavimentos podem ce¬ 
der sob os seus passos, etc. Os quadros podem deslizar sobre as 
paredes, descobrindo aberturas. 

Talvez lhe agrade criar um ambiente apenas para jogadores 
paranoicos, em que cada elemento provoque um desastre. 

Estou certo de que o leitor já lem mil ideias na sua cabeça an¬ 
siando por começar a pô-las "no papel”. Desejo-lhe boa progra¬ 
mação... As sugestões incluídas nos Apêndices poderão dar-lhe 
ainda mais ideias. 

Espero que nào seja molestado por nenhum temivel Dragão 
do Gelo... b 
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\PENI)IC KS 


1 — Sugestões de leituras 

2 — Listagem remunerada de Os Lobisomens e o Aventureiro 

3 — Listagem renumerada de O Desastre Asimoviano 

4 — Nomes aleatórios de locais e monstros 

5 — Endereços úteis 
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1 — Sugestões de leituras 

Existe uma quantidade impressionante de literatura de apoio 
aos jogos de Aventuras A lista que apresentamos em seguida 
traduz apenas os meus proprios interesses neste campo, não de¬ 
vendo ser considerada como uma tentativa de escolha das publi¬ 
cações pretensamente “melhores”. No entanto, ê constituída 
por obras que mc parecem interessantes e valiosas. Existem pro¬ 
vavelmente outras cem de igual valor, mas as aqui cjtadas servi¬ 
rão pelo menos como ponto de partida: 

THROUGH DUNGEONS DEEP: Robert Plamondon (Res- 
ton Publishing Company , lnc\, Reston, Virginia, 1982) 

What is Dungeons and Dragons — John Buuerfield, Philip 
Parker e David Honigmann (Pcnguin Books, Lid., Harmonds- 
worth, Middlesex, England, 1982). A expressão “Dungeons & 
Dragons” é o título, registado, do jogo de aventuras criado ori- 
ginalmente pela TSR Hobbies Inc. 


Dicing wiih Dragons, an lmroduction to Role-Playing Games 
— lan Livingstonte (Toutledge & Kegan Paul, Londres, Mel- 
bourneand Henley, 1982). 

Fantasy Role Playing Games — J. Eric Holmes (Hippocrene 
Books, Inc., Nova Iorque, 1981), 

Além dos livros, existem muitos auxiliares de jogo que lhe per¬ 
mitirão construir o ambiente onde decorrerá a sua aventura. 
Uma outra boa fonte de ideias são os livros de regras de jogos já 
existentes. Citemos alguns que lhe poderão ser úteis: 


MONSTER AND TREASURE ASSORTMENT 


TSR Ga¬ 


mes, POB 756, Lake Geneva, W1 53147, 1980, distribuído em 
Inglaterra por Random House, Inc. Esta publicação, com uma 
variedade de “conjuntos*’ e “níveis”, constitui uma óptima fon¬ 
te de ideias para nomes de monstros e descrições de tesouros. 


DUNGEON GEOMORPHS — Também editado por TSR 
Games, consiste num certo número de secções de mapas rectan- 
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guiares e quadradas, que podem ser combinadas entre si de mui¬ 
tas maneiras diferentes de modo a formar uma infinidade de 
plantas de masmorras e cavernas. 


BOOK O, AN INTRODUCTION TO TRAVELLER 


Lo- 


ren K, Wiseman (Games Designers’ Workshop Inc,, POB 1646, 
Bloomington, IL 61701). É um bom exemplo dos livros de regras 
a que já me referi, “Traveiler' ’ é uma aventura de ficção cientifi¬ 
ca passada no futuro distante, e o Livro O é uma introdução aos 
conceitos de desempenho de personagens para o caso especifico 
deste jogo. 


Como se indica no Livro O, "a quantidade de material 'Tra- 
veller’ disponível é abundante, e continua a aumentar". Apesar 
disto, os Livros 0, 1, 2 e 3 são o bastante para jogar, e o Livro O 
basta, por si próprio, para dar uma ideia do modo como se pode 
construir programas de aventura no espaço. 

Se encontrar um exemplar deste livro, facilmente verificará 
que contém um grande número de óptimas ideias utilizáveis no 
seu programa. Note que "Traveller" é um nome registado. 

O jogo de cartão "Dungeons & Dragons" constitui um bom 
modo de aprender algumas das possibilidade dos jogos de aven¬ 
turas. Pode começar pelo Conjunto Básico e pelo Módulo Intro¬ 
dutório. Este conjunto contém dois livros e um conjunto dc seis 
dados, com diferentes números de dados. Os livros contem as 
Regras Básicas e explicam os conceitos fundamentais deste jogo, 
o modo como os personagens sào concebidos, quais as suas per¬ 
sonalidades, como se decide o resultado de combates, e muitos 
outros aspectos do trabalho específico do árbitro de jogo, 

Além dos livros e dos dados, o conjunto inclui ainda um cená¬ 
rio de campanha: "The Keep on lhe Borderlands”. Este cenário 
é apoiado por uma grande quantidade de informações, incluindo 
urna série de mapas, dados sobre salas e jogadores, e novos deta¬ 
lhes sobre a resolução de combates. Penso que o conjunto Re¬ 
gras Básicas constitui provavelmente a melhor fonte de ideias à 
disposição do leitor. Permitir-lhe-á por outro lado compreender 
muito melhor o modo de desenvolver e controlar a execução de 
jogos de fantasia. 
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AVISO: As fontes de ideias aqui sugeridas deverão obviamen¬ 
te ser utilizadas apenas para uso pessoal, a fim de tacilitar a 
construção de aventuras para sua própria diversão. O leitor não 
pode no entanto incorporar material protegido por direitos le¬ 
gais em quaisquer programas que venha eventualmente a desen¬ 
volver para venda ou distribuição pública sob qualquer forma 

não autorizada. 
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Listagem remunerada de OS LOBISOMENS E O AVEN¬ 
TUREIRO 


1-0 


3 i 


H Z h 

0 5 X '5 0 N E N 5 


U H > 


1 t f j L> 
i + 1 W n, 


i k EI k 0 


20 PEM 
■3 0 3' 0 

ac ^ 


i <; 


1™* H í 


M ll 


: 5 3 0 


-1 r ]_ H ~l U' R 1 ; P ± 

h I J h ri ■ 

7"i ^ _v_ r, . 1“ L-- "J"' T ""!“ 

ri i I Arifc ^ 




L L 


— I w "I “ iTi 
‘ ^ ^ l" 


I: D N 5 cSUI ü 3 H 


zC J- 5P ■■ ; 11 : HzN 30 TO 4-0 
S 0 P. ± MT : íRIMT : C 0 M -5z0 U I Ü í : 

30 5 ü 5 3330' PRX*4T "t‘ p'pTh A 

■jH lL-'R L ; 0 WH T i.L’J » í * 

T *0 i^i 1^’ —131 i”i 

3O PR IMT PRIMT ' TERMIM0 Ü E5T 

H fiUzN i JR A : ri .. N $; " j > ’’ 

_90 PRINT PRINT ‘'CONSEGUIU SP 
IH DO CASTELO ■ ; 

100 0’J ■:■ fJ3 3S50 

110 PRINT pRIMT J1 0uHPRIU A SU 

H M X Z -Z 1 H <J 

120 ^ “ \J Z* ’ *3 G 0 

130 P R INT PRINT ;1 H SUA PÜMTíJA 

CAu z 

14-0 PP IN 7 " 3 sRELRTORIO+S* EMERGIA 
tItHXOUzZP: +CCMIDA+30iMh 
1P 0 Z T u P 

160 R E M + + + 

I ■ ■■ ■ ' ■ j ■ ■ ff f ■ ^ f ff ■ ■ ■■ ■ h ^ l ■■ 11 ■■ ■ ■" 11 I' ■■ ■ 


11 C Ü H K R IU A .5 U 


H S UH H Ü M T ÍJ H 


170 kzM +RQTXNR PRINCIPAL* 

ISO LzT zNzRGIA=zNERGIA-z 
190 Ir ENERGIA <10 THEN PRINT "C 
ÜIDADO "; M$, J ESTA ' FRACO! ,! : PPI 
NT 




j r ' 

' ■ h 


n p 5 


h 4 


200 ir triUKG IP < 1 TJ-fzN u>ü 0 £5y 
0- REM ^f-IÜKTz* 

210 LzT ptLfiTrtw TH =RzLATÜP XO *r 1 
220 PRINT N$; 1 ; PI SUA ENÉRGIP E 
'- EHERG IR 

23Ó Ir RiOUEZh> 0 THzM hwINT Tz 

H í";RIQUEZA 

2 4-0 CO li IDA > 0 THEN PRINT "0 S 

EU SHu0 Dz PR0 ü T 5 ü z5 uONTEh 11 .■ L'OM 

X L' R j U _L L- J R C 1 Z Z 1 'O E L- 0 M I'út-Í 

250 IF FRTü = 1 THEN PR INT ' “ ES^R '' 

R USRR fl hPNRDURR ' 1 

260 Ir MRCHRDO =0 RND zO.PRDh =0 P: 


l; 0 N T E h ' 1 .■ L' Li M 


1 “p t J 


\ 1 
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N D A M U i 


0=0 Tj-fEN GD TO 3:30 


7 0 P R T UT 


TPR 


4 30 NA!~:HRDO -1 

MACHADO" “ 

P ; 5PRDR=1 


CONSIGO ", 
t HcN PRINT 'Uh 


iDA TH£N PRINT 


íjHA 


IrOarTHEN^PRÍNT 0 "^" 50 * ND flrtU 

:,.I 0 IF AMULETOS! THEN'PRINT 0 


I i 

' I 


HMULET0 MAGIC0 ; ' 


320 

0 1 <j! 

DEM AS 


PRINT 
IF LUZ 


HtM PRINT íj E5Th' 


* RD0 es CU RO PR RR ij=c- 


w 1 4- 0 X í j J 'T — T c *h r _ 

e C0NTeUD0"Dfl & SfiLflÍ REH * K DEFI! '* 


- K =0 TH£N 

.‘flZlH* 

-T M sRND 


GO TO 4-90 


sSffLS J uc)zifl* THEN SO TO 49 

u% vr*^', „ _ 4 _ 

K:fG0 J TÔ ft 2 g ^° XflS N0 

3y0 IF K>9 AND H > . 5 THEN 


REM 


i HtN ! 
J H L 0 R D í 


* t ^ 

■J í 


K: GO TO 4*0 

^y?--£L. K>9 «ND 

Ç 5 ; GO TO 

4-00 PPIMi pp 


R T ,T,4S-r h£r '‘ pRiNT 

NO URLOR 

O 4-90 

PINT : PRINT "Cül 


A D 0 ! £ 5 t h 

■5 U B 3 3í=r0 
410 IF k 


R 0 UI u M 


.: FRINT " Cy ID 

NUNSTpflí ' 1 • - 

i ■ "■ l_I 


K = -i then 

: LÉf F 

k=-2 then 

"I-ífl T=‘- flD0R " ; L 

Cu FRNTRSHfi"■ ' i s” 

440 IF K = -4 THEN 


N LE 
FF = 5 


ET h 5 = 


PG 1 M T 


T Mj = "FflNRT 

TF = I0 


430 IF K=-3 THEN 

Cu FflNTRSMR"• | =” 

+40 iF k s-4 'then 

HC-UK URRQRQ £>n gc 
+ P0 li- Ks-5 THEN 


f! " 


£■[ M$ = "HRLEFI 
ei* M$ = "DEUR:5T 

LET PF-J.i 
" ^ ™ 


7HEN 


EL UNICORNIO "• LET FF = 


T M 5 = " HO RRp_ 


E 


t hen 

UEPUKtNHR l :, i >’' ■ I p 
7 ® PRINT :"print 


470 

* 4í0 


E 


* i i 

490 


500 pRi 

ESEUR r 


PRINT : PR TNT 
PRINT ; ppif^ 
■ ■ 

59 5 UB 3360 

PRINT PRINT 


M$ = 
=30 

U M 


E" Uh' 

0 PERIGO 


GIGA NI 
Mí 


PR IN 




510 

520 


IN P U T 

IF K < O 


A*: LET 

AND R$ 


LET H5 


TO 


I b 


/ V 


i d 


- I U 


RND R$:> 
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F" THEN GO TO 510 
530 PRINT : PwINT 


P HINT 


RINT 

540 Rj = 'Oi" THEN GO TO 130 
550 IF R$="N" AND flíSfi,l)=0 
N PRINT "NR0 HR-' 5RIDR POR 
ij 0 T 0 4 y 0 

560 IF R$ = 11 3 ’' RND Rí5R,2> 


i ' 


H 


Í I 


rnK 


% I 1 


560 IF fl$ = IJ 5" AND FM5R,2)=0 Thír 
N PRINT 11 NA0 EXISTE BRIDA R SUL" 
GO TO 490 

570 IF R$ ="E" AND HíSH.,3j=0 i Ht 
M PRINT "NAO PuDc PROSSEGUIR PRR 
A ESTE": GO TO 490 

530 IF A$ =s M 0 M AND R!:õR,4:=0 THE 
N PRINT "NAO PODE ATRhUESSAP PAR 
EDES" ' GO TO 4 ( P0 

530 IF = RND A (5A ■ 5? = 0 THE 
N PRINT "NAO PODE SUBIR POR AQUI 
": GO T Ü 490 

t!00 I~ A 5 = * 1 D 11 AND A ■, jfl ^ t.i =0 THt 
N PPIMT "NAO PODE DESCER POR A0U 
I": GO TO 490 

610 IF A$="F" RND RND>.7 THEN G 


1 t vj ji 

1^ ■ p 


HE 


N 


E SUBIR POR AQUI 


x t 1 ±r nj= r 

0 TO 2710 
620 IF AÍ = ''F- THEN PRINT "PARA 
ONDE 0 ü iz. P FU A IR?" ■ GD TO 510 
630 IF A$= ’L" AND AÍ5A,7)>-I TH 
EN PRINT "NAO HA 1 ' AQUI NINGUÉM C 
OM QUEM LUTAR": GO TO 490 


540 IF A$="I" 

R ET U R N 

650 IF A$="C" 
PRINT "NAO TE 
30 

660 Ir A4="G" 
RETURN 

670 IF H$="L" 


THEN GO 5Ue 3300 


R$ = ,4 C" AND COMIDA =0 THEN 
NAO TEM COMIDA": GO TO 4 


THEN GO SUB 2640: 


670 IF h$="L " THEN GO TO 320 
630 IF A$ = "M" THEN FOR J = 1 TO 3 
0: PRINT TAB J;"*" ; NE XT J 
690 IF A$="M" THEN LET SA=IMT < 
RND*19) +1; IF SA=6 OR SA = 11 THEN 
GO TO t>90 

700 IF A4 = ,r M" THEN GO TO 300 
710 IF A$ = J, C" THEN GO SUB £77.0: 
RETURN 


720 IF A$="N M 
1) 

730 IF R$="S" 


THEN LET SA=AÍ5H; 


THEN 


T SA =A* 


\ I 
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74.0 

3) 

750 

4-j 

760 

5) 
770 

6) 
730 


I 


A$="E" THEN LET SA=AÍSA 


IF Ai="0" THEN L 


IF A$-"U" THEN LET 


5R=R(SR, 


730 IF A$="R" THEN PRINT "'fl SUR 
SITURCflO E •’ : " , " PQNTURCRO : " ; 3* 

RELATOR IO +5*ENERG IR +2*RIQUEZA+C0 
MIDA+30*MM 

790 IF A5="R" AND RNO >.5 THEN P 
RINT " MATOU ";MM;" MONSTROS RTE 
AGORA" 

300 RETUPN 

310 REM **#************■*»*•** 

320 REM *CÜMBATE* 

330 IF INKEYÍ <>"" THEN GO TO 83 

0 

84-0 PRINT " CARREGUE NUMA 

TECLA . " 

350 IF INKEY$="" THEN GO TO 350 
360 IF FRTO = 1 THEN PRINT "A RRM 
ADURA AUMENTA AS SUAS POS- SI3IL 
IDADES DE ÊXITO": LET FF =3*INT i 
FF/4-) : GO SUB 3360 • 

370 CLS : FOR U=1 TO 6: PRINT " 

+ * 11 * ■ ■+ ■ r ■! ■■ ■ i n* ■■ fl * * i j ■■ + ■ ■ | n ■ ■ f ii ■ r r ■ ■ * i* T> J i ' í * * ■■ * * ■ 

": NEXT U 

330 IF MACHADO=0 AND ESPADA=0 T 
HEN PRINT " UOCE NAO TEM ARMAS": 
PRINT "DEUE LUTAR DE MAOS NUAS" 
LcT rF=INT iFf + Fr /Si . GO TO 9B 

0 

390 IF MACHADO=1 AND ESPADA=Q T 
HEN PRINT " UOCE TEM UM MACHADO" 
LET FF=4.*INT íFF/5) : GO TO 960 
900 Ir MACHADO=0 AND ESPADA=1 T 
HEN PRINT "UAI LUTAR COM A ESPAD 
A": LET FF =3*INT (FF/4.) : GO TO 9 
60 

910 INPUT "QUE ARMA QUER USAR i 
1-MACHADO; 2-ESPADA)? ”;Z 
920 IF Z •: 1 OR Z >2 THEN GO TO 91 

0 

930 IF Z = i THEN LET FF =4.* INT <F 
F / 5) 


A=h iSA, 


IF R$="D" THEN LET SA=A(SA, 


THEN PRINT "At SUA 
, " PONTUACAO : ";3* 
ERGIA+2*RI0UEZR+C0 


CARREGUE NUMA 


HEN LET FF =4-* INT <F 
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D m 

ií 


A 


94.0 IF Z=2 THEN LET FF =3* INT íF 
F / 4-) 

950 REM ************************* 
960 REM *A LUTA* 

970 PRINT : PRINT 
930 IF RND >.5 THEN PRINT Mí;" A 
TACA-O": GO TO ,1000 
990 PRINT "UOCE ATACA" 

1000 GO bUB 33b0 

1010 IF RND > . 5 AND LUZ-1 THEN PR 
INT "O ARCHOTE CAIU-LHE DAS MAOS 
!": LET LUZ=0: GO SUB 3360 
1020 IF RND >.5 AND MACHADO = 1 THE 
N PRINT "UOCE DEIXOU CAIR 0 MACH 
ADO NO CALOR DA LUTA!": LET MA 
CHADO =0: LET FF=5*INT (FF/4.) 

1030 IF RND>.5 AND ESPADA=1 THEN 
PRINT "A ESPADA FOI-LHE ARRANCA 
DA DAS MAOS!": LET ESPADA=0: LE 
T FF =4-* INT irF/3) 

104-0 IF RND >.5 THEN PRINT : PRIN 
T "UOCE CONSEGUE FERI-LO": LET F 
F=INT i5*FF/6) 

1050 IF RND>.95 THEN PRINT " AAAa 
aaaaargh! ! !" : GO SUB 3360: PRINT 
"ESTA ACERTOU-LHE EM CHEIO!" 
1060 IF RND>.9 THEN PRINT "UOCE 
QUER FUGIR, MAS RESISTE AO MEDO. 


í - I 
# + r I 


1070 IF RND>.9 THEN PRINT 
58 &V.8598XSÍ: &,y.nnU9*¥/.*%%" 
1030 IF RND>.7 THEN PRINT 
ESTA UMA LUTA DE MORTE?" 
1090 IF RND>.7 THEN PRINT 
HOS DO MONSTRO FAÍSCAM DE 


"átttíKK 
"SERA ■' 


"OS OL 
ODIO. 


1100 IF RND >.7 THEN PRINT "DAS S 
UAS GARRAS ESCORRE SANGUE!" 

1110 IF RND >.7 THEN PRINT "SENTE 
O CHEIRO A ENXQFRE NO HA- LITO 
DO MONSTRO..." 

1120 IF RND>.7 THEN PRINT "ELE G 
OLPEIA-0 SELUATICAMENTE..." 

1130 IF RND :> . 7 THEN PRINT "UOCE 
NUNCA ENCONTROU UM OPOSITORTAO F 
ORTE! " 

114-0 GO SUB 3360 

1150 IF RND >.5 THEN PRINT ': PRIN 
T "O MONSTRO ATINGE-0 !": LET ENE 


191 







aSI§*iF E oSÈ?:Ss_T«eN go TO 90B 

rs? íí S^&SkíBI^SÍV.s 

$: LET MM=MM-rl: GO TO 1190 r 

1180 PRINT : PRINT ' O i.g*torTa^ 
CEU 1 "- LET ENERGIA=INT lENEPtlB' 


1190 LET PÍSP,7)=0. ÍP,R S ^Í6Í Õ6 PÊ 
PRINT : PRINT : GO PUB 33t>0. Kfc 

TURN 

1200 REM **************.** *f *-, 
1210 REM *DESCRI CRO Dm , 

1220 PRINT : PRINT “***********£ 

******************** : i-RINT . r 

1230 FOR T =0 TO 13: IF SR=T + 1 TM 
EN GO SUB 1250+X*70; RETURN 
124-0 NEXT T 

1250 REM *******************- 
1250 REM *5hLR 1* ^ . T . T -,, 

1270 PRINT "UOCE EoTR' Nu 
1230 Ir RND>.4 THEN kRINT hçL*_* 
PO’' QUE 5E ESPRLHfl MO írÜLÜ HLjIU I 
NHfl-SE QUE MINGUEM AQUI Phsoh 

DE*DE Hfl' MUITOí" „„„ . - 

1290 PRINT "EXI5TE UMfl PORTh h o 

U L 11 — - 

1300 PRINT "ATRAVÉS DE «JANeLAS H 

NOR T E CQN- SeGUe VEk O ■.•ARl-j-M. u 

AS DAMAS" 

1310 RETURN 

1^20 REM ******************* 

1330 REM * S fl L fl ;2* _- 

134-0 PRINT ” ESTfl *' NR UfiMHHH Dc H 

IsÜ^IF^RND > . 4- THEN.PRINT ''Rs TR 
PECARIAS DAS hRREDEs £HÜ UMh j. 
OEIR DO ANlIGO EsPi_cNDOR t>i_oTfl 

-=Q[ p " 

1350 PRINT "EXISTE UMfl JRNELR R 

C 1 ■■" "T* C 1 1 1 

1370 PRINT " OLHRNDO PARA A DIREI 
TR flTRAUES DE LR CQNScGUc UEh h 
ENTRRDR DO CASTELO " 

1330 RETURN 

1390 REM ***************** 

14.00 REM *SRLR 3* . _ __ 

1410 PRINT “ESTA'' NUMR bhhN 
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DE, EM FÜRMADE L M 

1420 PRINT "EXISTEM DUA; 

NE-^TA SRLR" 

1430 PRINT !I RS MADEIRAS 
DES ESTRO GRSTRS E ENí 


5 PORTAS 

D R w* P R K 
CURURDA5 


1440 IF RND;-,4 THEN PRINT "OUUE 
Ü RUIDO DE UM RATO ATRAS DESIí R 
ODR SOSRc 05 CALCANHARtS* . - MAS N 
RDR UE! ,; 

1450 RETURN 

1450 REM * * * * * * * * + ^ ^ ^ ■¥■ * * * 

v i 1 1 ’ T ■ H » 4-# di H ■ ■ P ■ ■ H ■ | ■ ■ ■ |h ■ ■ + ■ | p ■ ¥ # h ah I i* 

14-70 REM íõALA i* 

14-30 PRINT "ESTA' NA SALA DO CON 
SELHO PRIMA" 

14.90 PRINT " -DO DO REI" 

1500 IF RND ■: . 4- THEN PRINT "0 ECO 
DAS ANTIGAS DISCUSSÕES AINDA 
PARECE ENCHER A SALA..." 

1510 PRINT "EXISTE UMA SAIDA A 5 
UL" 

1520 RETURN 

1530 REM *****íí*ü*sü*^4.í**^ 

* ■■ I. T 1 " da ■- ■ + ■ f ■ I L- ^ d d-l ■ d" 1 ■ d ■ ú i > 

154-0 REM- íSALA 5* 

1550 PRINT "ESTE ATRIO INTERIOR 
RO-?sUI UMh PORTA A NORTc E QUTR 
A A OESTEj" 

l5S0 PhINT "ALEM DE UMh EsCADA C 
IRCULAR QUE ATRAUESSA UERTIC 

ALMENTE A SALA" 

1570 IF RND>.6 THEN PRINT "A SAL 
A E'PEQUENA, E DESAGRADAUEL" 

1530 PRINT "UüCe Ue UM LhQO OhNA 
MENTAL ATRAUES DAS JANELAS 

A SUL" 

1590 RETURN 
1300 REM 

4 L d I ■ p n £ I# dd- ■ d 1 m p ■ ^ *p a a ^ d + ■ n p T ■ TI 1 ■ I a 

1610 REM íSALA 5* 

1620 PhINT "eSTA' NA ENTRADA De 
UM CASTELO" 

1630 PRINT "EM PEDRA, DE APARENC 
IA TERRINEL" 

164-0 PRINT "UOCE ENCONTRA-SE UIR 
ADO PARA" 

1650 PRINT "ESTE” 

1660 RETURN 

1670 ReM ** *****•**■*■*•♦ *•lí**-** 

1630 HEM *5ALA ’7* 

1690 PRINT "UOCE ESTA' NAS COZIN 


13 
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c 

0 


MM 


2030 REM *SALA 12* 

204-0 PRINT "ESTA' NUMA MASMORRA 
ESCURA E HÚMIDA" 

2050 PRINT "EXISTE UNA UNICA SAI 
DA UMA” 

2060 PRINT "PEQUENA ABERTURA NA 

PAREDE A OESTE" 

2070 IF RND > . 4- THEN PRINT "DE 5U 


BITO OUUE-SE UM RU IDO SECO UINDO 
DA SALA DO CARCEREIRO,.," 

20S0 RETURN 

2090 REM ******************** 
2100 REM *SRLA 13* 

2110 PRINT'"UOCE ESTA' NA SALA D 
O CARCEREI- RO, NOS SUBTERRÂNEOS 
DO CASTELO" 


N D O 


2120 PRINT 
TA SALA" 
2130 PRINT 
RA sAIDh, 

A ESTE" 

214-0 PRINT 
NTE-SE UMA 
UINDA DAS 
PEDRA ! " 
2150 RETURN 


"A 


SCADA TERMINA NES 


"EXISTE AINDA UMA OU1 
UMA ABERTURA UIRADA 


"n 


0 AR E' HUM IDO. . . SE 
u-ORnt NT" £ D £ PP P ± U 
FENDAS EXISTENTES NA 


2160 REM * 4-'+ * '-t * * * ** * * * ^ * * ** 

2170 REM *SRLA 14-* 

2180 PRINT "ENCONTRA-SE NOS APOS 
ENTOS DO REI, NO NIUEL SUPERI 
OR DO CAS- TELO" 

2190 PRINT "OLHANDO PARA BAIXO E 
PARA OCI- DENTE, ATRAUE.S DA JA 
NELA, PODE UER A ENTRADA DO CAS 
TELO; " 

2200 PRINT "E O JARDIM DAS DAMAS 
E‘ UISIUEL DA JANELA A NORTE" 
2210 PRINT "EXISTEM PORTAS PARA 
eSTe E SUL" 

2220 RETURN 


"EXISTEM PORTA 


PARA 


2230 PeM *******.**■**.»■.**.*■****.*•£ 

H f ■ ■■ ■■ i 1 I ■ ■% M r | ■ I frf I i «f ■■ q ■ rffc I 1 1 ! IT f ■ mi 

224-0 PEM *SflLfl 15* 

2250 PRINT "ESTfV NO RTPIO EH PO 
RMR DE L" 

2260 IP RND >,4- THEN PRINT " - * * U 
Hh BORBOLETh UOP JUNTO RO TECTO 


w * 


2270 PRINT 
UMA PORTA, 


A NORTE ENCONTRA-SE 
E EXISTE AINDA UMA 
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SCADA" 

11 CONSEGUE-SE n LA 

2290 RETURN H " R oUj - 

2300 ReM ■í*+^^4,4.^ivv :t ^v.v.j t va.vv 

“i® *5ALH 16# 

Mi^E p Oá^fll!?;g Sgfcg oSM^ílg 


RANHfi I DEScÍ > PELfl^R^| NT " UM * fl 

fpPENflS*" 7 " NR *^STEM* JANELAS; 

23&0 PRINT "PORTAS" 

2360 RETURN 

2330 REM isALA*!?!**********^ 

fGO 0 GSflRTO"'' OOOH '" ESTR ' N0 ™T 

24-00 PRINT 11 DH3 CRIADA^ 1 ' 

NDR 0 UM R L=U=' -9| E ct -LHE " SENTIR ri 

S 4 =® RR INT ExIsTE UMA SAÍDA PAR 

24.30"r|tlÍRN H 0RTfl PflRfl SUL " 

2450 REM «SALA 13* **’*** 

*PX®o P §mdÍ "|?T9 PEQUENA SALA DO 
,-Ç4pO oUPe- RIOR E- A SALA DE UE 

Pfl 7 5no5F NT "Ig^TE UMA JANELA PR 

^A§rt U BD?9S 1MMl=1IS ABAIXO" ItE 

SUL" T EXI ‘ oTE AINDA UMfl POR 

24-90 PRINT "UOCE UE a =no DcnoD-r 

E RDTU E NHD ÜME 5Ê ELf:,ü - NP SUfl FAC 

P^ret^n _bE ° MED0 -"" 

SrS ***************** 

2520 REM *SALA 19# * 

Ü£NA SRLft" My0CE ENT «OU NUMfl PEQ 

PRINT "FORA DO CASTELO" 

pEÍ 0 DflS I Jfl-'" POI>E UER ° LRí;0 flTRR 

IPi rIturn" N£Lfls UIRR£>RS R SUL" 

2530 REM ************* 


UIRADA 


A SUL" 
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2590 REM *MORTE* 

2600 PRINT "UOCE MORREU, * *" 

2510 GO SUB 33S0 
2620 GO TO 130 

2630 REM ■*********■**•»•»■**■***■** 
2640 REM íGURRDRR RIGUEZRISí 
2650 IF fi(SR,7:'<Í0 THEN PRINT "N 
RO EXISTE ROUI NENHUM TESOURO": 
GO SUB 3360: RETURN 
2660 IF LUZ =0 THEN PRINT "MAS ES 
Tfl- ESCURO E UOCE NADA UE": GO S 
UB 3360: RETURN 

2670 LET RIOUEZA=RIOUEZA+AiSA.7) 
2630 LET A(SA,7)=0 
2690 RETURN 

2700 REM *••****•****•*■*■*****í** 

2710 REM «TENTATIUA DE FUGA SEM 
EXTTO * 

2720 PRINT "NAO, DEUE FICAR E LU 


LU 


TAR " 

2730 LET A*="L" 

2740 GO SUB 3360 
2750 GO TO 640 

2760 REM •*■***■*■•*■■»**■!(■■(■*•**■*■*■»«•■!(■» 
2770 REM *COMER* 

2780 CLS 

2790 IF COMIDA ;1 THEN RETURN 
2300 PRINT "TEM " COMIDA; " UNIDA 
DES DE COMIDA" 

2310 PRINT "OUANTAS OUER INGERIR 


2830 

2340 

2350 

7\ 


2370 

2330 

2390 

2900 

2910 

\ 


INPUT Z 

IF Z>COMIDA THEN GO TO 2320 

LET COMIDA=INT íCOMIDA-Z) 

LET ENERGIA=INT (ENERGIA+5* 


CLS 


GO SUB 3360 
R ET U RN 


REM 
REM 
C L 5 


920 LE 


Hf* 

it ■* 

*INICIALIZARx 


* í * 


ET ENERGIA=60+INT ÍRND*100 


KlGIUEZA=30 + INT (RND-S-100 


2930 LET COMIDA=0 
2940 LET RELATORIO=0 
2950 LET MM=0 : REM «NUMERO D 
N5TR0S MORTOS* 


MO 
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2960 

2970 


2390 t~UR 5=1 TH iq 
3000 FGR C=1 TÕ 7 

3020 NEXT C 
3030 NEXT B 
304-0 INPUT ;j 3UflL F 

EXPLORADOR? 

3050 CL* 5 

?5, 60 ,tfT. 3fl_=6: «EM 


RfH «dêpínír‘ óflsfe£ni 

DIM H (19,7t 
FOR 5=1 TH iq 


O 5 


NOME 


roí *«=B ; R ^M * 

5S^' r'9= N i.ye.SflLfl) * 


*P05ICflO INIC 


3070 

3030 

3090 

3100 

3110 

3120 

3130 

314-0 

3150 

3160 


LET 


PEM ******4* ##+ 

§Í3 Fo£ 3>l™™i*"tèèòõ*òl 

!Í?j?g tl T M M fINT"(RND*19)+i 

.^then^o^S §a 5 S =li 0R flíM ' 7,<>0 

3130 NEXT*j M ' 7: ‘ =rNT (R WD*100) +la 

3200 P§tj »BT'-TDTanfn íííífíHíí * 
3210 Fnp U-Pr* £ UIR ASTROS* 

32§| V| T H^lNT^RNOifiej+l 

THEN GO M fn -issS -11 0R HlM J 7:, <>0 
32*0 LET flü1,7.i=-j 
32&0 NEXT j 

-ic.60 LtT fl { 4 -1 7.! =100 + INT íRND-^100 


E6PRDR s0 

AMULETO=0 
MACHADO=0 

FAT□=0 
LUZ =0 


.! =-J 


3270 LEi A (16 , 7) =100+INT ;RND*10 
3280 RETURN 

Islã PEM íyKJl1lM-?!ní** íí#í ***í 
3310 PRXWT ^P§pu5ÇÍ2i' pr OUI50E5* 

IO" ^ KX * T t-RuUIoües & INUENTAR 

3320 GO SUB 3600 

"GO TO F 3Í70 UE2ft<,:L THEN L£T Z=£ 
334-0 PRINT "UOCE PODE COMPRAR: 

I *> i ” ARCHOTE íii 


= 0 
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3350 PRINT '■ 

j 11 

3360 PRINT " 


2 -> MACHADO (410 

3 - ESPADA (420) 


3370 PRINT " 4- - ALIMENTOS (4 

2,UNIDADE)" 

3330 PRINT " 5 - AMULETO MAGI 

O O ( $ ^ í3 * 11 

3390 PRINT " 6 - ARMADURA (45 

0 ) " 

34.00 PRINT " 0 - CONTINUAR AU 

ENTURA" 

34-10 IF LUZ = 1 THEN PRINT "UOCE T 
EM UM ARCHOTE" 

34-20 IF MACHADO =1 THEN PRINT "O 
SEU EOÜIPAMENTO INCLUI UM MA- CM 
ADO” 

34-30 IF ESPADA = 1 THEN PRINT "GUA 
RDE BEM A SUA ESPADA" 

34-4-0 IF AMULETO =1 THEN PRINT "C 
SEU AMULETO AUUDA-LO-A' EM MO-ME 
NTOS DIFÍCEIS,.," 

34-50 IF FAT0=1 THEN PRINT "A ARM 
ADURA FICA-LHE BEM.,." 

34-60 INPUT '"NUMERO DA OPCAO? ";Z 
34-70 IF Z=0 THEN CLS : RETURN 
34-30 IF Z = i THEN LET LUZ = 1: LET 
RIQUEZA=RIQUEZR-15 
34-90 IF Z =2 THEN LET MACHADO = 1 : 
LET RIGUEZA=RI0U£ZA-10 
3500 IF Z =3 THEN LET E5PADA = 1: L 
ET RIQUEZA=RIQUEZA-20 
3510 IF Z=5 THEN LET AMULETO=1: 
LET RIQUEZA =RIQUEZA-30 
3520 IF Z =6 THEN LET FAT0=1: LET 
RIQUEZA=RIQUEZA-50 
3530 IF RIQUEZA<0 THEN PRINT "TE 
NTOU ENGANAR-ME!": LET RIQUEZA=0 
: LET FATO =0: LET LUZ=0: LET ESP 
ADA =0: LET AMULETO=0: LET COMIDA 
= INT ÍCÜMIDR/4-) : GO SUB 3360 
354-0 IF Z<>4- THEN GO TO 3320 
3550 INPUT "QUANTAS UNIDADES? "; 
Q: LET Q = INT (Q) 

3560 IF 2*Q>RIQUEZA THEN PRINT 
NAO TEM DINHEIRO SUFICIENTE": GO 
TO 3550 

3570 LET COMIDA=COMIDA+Q 
3S30 LET RIQUEZA =RIQUEZA-2*Q 
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35S0 GD TO 3020 

3600 IF RIOUEZfi >0 THEN PRINT : P 
RINT : PRINT "UOOE TEM $";RI3UEZ 
fl 

3610 IF RIQUEZR=0 TMEN PRINT "NR 
D TEM DINHEIRO": 00 SUB 3360: RE 
TURN 

3620 FOR J=i TO 4: PRINT : NEXT 


3 b 4- 0 


RETURN 

REM ** 
DATA 0 


P a / ir 


■ * 


■ P H. 


-+ 1 ■ n r b 14 ■ J pi * * # fl 1 > 'P V % * * ■ T 1 ■■ „px ai V V 


fl 1 

36fr0 DATA 

H £ 

LSÔ70 DATA 
R 3 

3630 DATA 


0,2,0,0,0,0,0 


DATh 1 ; , 3 , 3 , 0 i 3 .> 0 

DATA S/SjSjSíÔ/í/fl 


REM SAÍ¬ 
REM 5AL 
REM 5AL 


3630 DATA ©,&,©,©,©,©,©: RizM SAL 
A 4- 

3690 DATA 4-, 0 . © , 3,15,13,0 : RE 
ALA 5 

3700 DATA 0,0,1,0,0,0,0: REM 
A 6 

3710 DATA 0,3,0,0,0,0,0: REM 
A 7 

3720 DATA 7,10,0,0,0,0,0: REM 
LA 3 

3730 DATA 0,19,0.3,0,3,0: REM 
LA 9 

374.0 DATA 3,0,11,0,0,0,0: REM 
LA 10 

3750 DATA 0,0,10,0,0,0,0: REM 
LA 11 

3760 DATA 0,0.0,13,0,0,0: REM 
LA 12 

3770 DATA 0,0,12,0,5,0,0: REM 
LA 13 

3700 DATA 0,15,17,0,0,0,0: RE 
ALA 14. 

3730 DATA 14-, 0 , © , 0,0,5,0 : REM 
LA 15 

3300 DATH 17,0,19,0,0,0,0: Ríi 
ALA 16 

331© DATA 13,16,0,14-/0,0,0 : R 
^ALA 17 

3320 DRTR 0,17,0,0,0,0,0: REM 

Lp 2.B 

3330 DATA 9,0,16,0,0,0,0: REM 
LA 19 


DAT A 4-, 0,0,3 , IS , 13,0 : REM 5 


0,0,1,0,0,0,0: REM 5AL 


0,3,0,0,0,0,0: REM 5AL 


REM 


7 , 10 , 0 , 0 , 0 , 0 , 0 : 
0,19,0,3,0,3,0: 
3 , 0 , 11 , 0 , 0 , 0 , 0 : 
0 , 0 , 10 , 0 , 0 , 0 , 0 : 
0,0,0,13,0,0,0: 
0,0,12,0,5,0,0: 
0,15,17 j 0,0,0,0 
14-,0,0,0,0,5,0: 
17,0,19,0,0,0,0 


R E H 5 A 
REM 5A 
REM 5A 


A 


REM 5A 


REM 5A 


REM 5 
REM SH 


RnM — 1 


13,16,0,14-, 0,0,0 : RtM 
0,17,0,0,0,0,0: REM 3A 


200 


334.0 REM ****** ********** ” \í 
3350 REM *AJU5TÉ 0 ATRAoO Au 


GOSTO * ^-r- 

3360 FOR T = 1 TO 900: NEXT T 
3370 RETURN 
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3 — Listagem renumerada de O DESASTRE AS1MOVIANO 


10 R £ M 


0 D £ B R 3 » R £ H3 Ih0 U IhNG 


ü u> 2 & £ 0 : K E H s IMICIRLI 


i m F 


I I 


C 0 0 ■-:JS 2 & 2 0 : h*E M * INICIRLIZ 

RRr 

30 Gü SUB 73 

4-0 IP 3R = 13 THEW LET Q0=QQ+ i: 
IP 00=6 THEN GD TO 1370 
50 G D T Ü 30 

50 R F M 

1 ■ ■- m p ■■ ■■ ■ ■ rh ■■ ■ P ■. *■ ■ i ■ * •»■► ■■ ■ + ■> "|i ■ J ■■ ■■ il 

70 RÊM *R0TINA PRINCIPAL* 

30 LcT IA =£MEP'7ip — 5 

90 IF ENERGIA ; 10 THEN PRINT "C 
UIDADO , COMANDANTE".NS'"NE0ES5IT 
A DE OXIGÊNIO!": PRINT 
100 IF ENERGIA ;1 THEN GO TO 202 
0: RtM *MÜRTE-* 

110 LET RÉLfif0RI0=RELAT0RI0+1 
120 PRINT "COMANDANTE 
"A SUA ENERGIA £' ENERGIA 

130 IF RIQUEZA>0 THEN PRINT "TE 
M " ; RIOUEZA; " CRÉDITOS SOLARES"'' 
14-0 IF OXI>0 THEN PRINT "OS SEU 
S DEPOSITOS DE RE5ERUA CONTEM 
",0X1.;" UNIDADES DE OXIGÊNIO" 
150 IF FATO =1 THEN PRINT "ESTA'' 
A USAR FATO DE COMBATE 1 ' 

ISO Ir- JAU=0 AND LASER =0 AND TR 
ANS=0 THEN GO Tn 230 
170 PRINT "TRAZ CONSIGO " 

130 IF IAO=i THEN PRINT "UMA PI 
STOLA IONICA" 

190 IF LASER = 1 THEN PRINT "UM L 
RS ER " 

200 Ir LR5ER+IRO>0 RND TRRNS=1 

THEN PRINT l, E " ; 

210 Ir TRRNS = 1 THEN ^'PINT J1 0 TR 
HN5P0PTfiD0P DE HRTERIR" 

220 PRINT 

£30 IF LUZ =0 THEN PRINT ,J ESTR ' 
DEMRSIBDÜ ESCURO PRRR UER" 

24-0 IF LUZ = 1 THEN GD SUS 930: R. 
EH íDÊSCRICRO DR SBLR* 

250 LizT K=R<;3R,7) : REH *K DtFIN 
£ CONTtUDÜ DR SRLR* 

2S0 IF K=0 THEN GO TO 350: REH 


H 


í r\ 


M i ( 


203 


*SALA UAZIfl* 

270 IP K > S THEN PRINT " ENC 
AGUI $ “ ; K ; J1 CRÉDITOS" : GO 

0 

230 PRINT : PRINT : PRINT 
ADO! HA" AQUI PERIGO?": .GO 


ÜNTRA 

T tl ;“.F 


"CUID 

SUB 3 


RAS 


290 IP K=-l THEN LET M4="GUERRE 
IRO ANDROIDE": LET FF =5 
300 IF K =-2 THEN LET M$="DEL-FI 
EUIANO AUARIADÜ": LET FF =10 
310 Ir K = -3 THEN LET M$ = "ROBOT 
RASTEJANTE": LET FF =15 
320 IF K = -4- !HEN LET M$="ALIENI 

Gt,NO Su.RRIDENTE" : LET FF =20 
330 PkINT : PRINT "E '' UH " ■ H$ 
_ : 34.0_RRINT : PRINT "OS INDICADOR 
l3 Dl PEkIGO REGIS- TAh JJ rr ; " U 
NIDADES! ! 

350 GO SUB 3550 

350 PRINT PRINT PRINT "QUE 
DESEJA rAZÊH'7 " 

370 INPUT A$: LET A$=AÍÍ TO I; 
330 1 “ K <0 AND A $ < > 1 ' L " AND Ajo 
r THl N T O 370 

390 PRINT ; PRINT : PRINT "- 


í J 


J Í 1 1 I ^ 


RINT 

4-00 Ir A 4 = " 0 f THEN GO TO 13^0 
4-10 Ir A4="N" AND AÍSA J 1)=0 THE 
N PRINT "NAü HA" SAÍDA POR AI"": 
G Q TO 350 

4-20 IF fl$ = ,, S M AND A<SA;2>=0 THE 
N PRINT ; NAG lXTSíl 5AIDA A SUL" 
: GO TO 350 

4.30 Ir H$ ="E" AND AÍSA,3)=0 THE 
N PRINT ' J NA 0 PODE PROSSEGUIR PAR 
A lSTE": GO TO 350 

4-4-0 IF A $ =" O'' AND Aí3A,4J=0 THE 

N RRIN: "NAü PODL A! RA Ut55RR fhk 
LDES": GO TO u 5 0 

4-50 IP A4="U" AND A USA , 5; =0 THE 
N PRiNT "NAO PODE SUBIR POR AQUI 
" : GO TO 350 

4-60 Ir A $ = " D' : AND A CSA , SU =0 THE 
N PRINT "NAÜ PODE DESCER PÜK AOU 
I": GO TO 350 

4-70 Ir H$ = " r" AND RND> »7 THEN G 
O TO 24-4.0 


H 


^ 11 


1 I 7 L_ 
m (T 

a 1 lj -L 


THE 

ROU 
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4-30 IF «* = ' F“ THEN 


I 1 


RINT "PARA 


ON D t QUfcR FUGIR?": 

4-90 IF A$ =" L " AND 
EN PRINT "NAO HA*' 


GO iO 370 
fl l b n ; 7 ~ 1 TH 

AOUI NINGUÉM C 


OM QUEM 


LU í AP" : GO 


Ü 350 


500 


Ir Aí = " I" THEN GO SUB 304-0: 


RETURN 

510 IF R 5 = 11 C 1: AND 0X1=0 


IN 

0 


NAO TEM OXIGÊNIO" 


THEN PR 
G O T 0 3 5 


520 IF 
RETURN 
530 Ir 


Ai = " G 


s30 ir AÍ = "L"' 
54-0 JF h$=" m " 

RND*19í+l: IF 

GÜ TO 5 4-0 
550 Ir A 4 =' 1 M ” 


THEN GO 5Ü5 


370 : 


HEN GO TO 550 


THEN LtT SA = INT_ í 
5 A =6 ÜR SA =11 iHtN 


560 Ir 
RETURN 


A 4 = ‘ ’ M 1T THEN GO 


^ c r* 

| M 1^1 i ■ 


A $ = 


f i ,—r I : 


570 IF AÍ="N M 


■1 r , 

Ji. 


530 IF A4 = "3 


5 90 


r A $ - 


— 11 “ J J 


THEN GO SUB 2500: 
IHEN l£T SA=H l "A j 
THEN LET SA=AíSA, 


N 


ET SA = A £ 5A r 


r. t 


00 


4- 5 


A 4 = " 0 


THEN LET SA=A(SR 


610 Ir H5="ü" THEN 


E 


5 A — A S A ; 




S20 


OJ 


S30 

Õ4-0 


Ir h$="C 
R ET U R N 


THEN LET Sfl=A; 


I i 


RlM 

REM 


SS0 


0 


^ :£ 2L 2^ 2^ ^ ^ 

fc ■ ii r ■ ■■ i ■ ■ j ■■ ■ ■ ■■ i ■ 

rCOMBATE * 

IN K E V 4 < :> " " 


4 - ± ^ ^ v. 

Hl f ■ ¥ 1 ■■ ■ 


H t N G 0 


4 I 


I M k 


S70 PRINT " 

ECLA . ' 

530 IP INKEY4="" 
590 Ir rAT0 = 1 ;r 
0 DE COMBATE AUME 


! í 


T 


DE UüMcíATE AUMENTA 
DE SOBREUIUENCIfi" : 

( r F /4-} : GO SUB 35s 


CARRlGUl NUMA 

THEN GO TO 530 
N P R IN i ‘_i r H í 
TA U O L U i M D i u 


E AUMENTA 0 SEU IMDiu 
IUENCIA"_ LET Fr =3*IN 
0 SUB 3550 

FOR”U = 1 TO S: PRINT " 


700 CL5 FOR J=1 TO S: FKlP 
" . NEXT J 

"T* ^ 0 p p J 

723 Ir IhO=S SNC' Lfi3En=3 TH£ 
RINT " MOCE NH0 TEN RRÍIRS" : f 


X ? ™ "l ^ 1 ^ 1^1 

i -L n U n 

" UOCE NAü 


! ^ iw j r-. í ^ c cr h 

1 — f ni 4 í . LHOi_n 


y t 


SER =0 THEN P 
ARMAS": PP IN 
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T n ;-i 


T 'DEUf LUTAR DE MAOS NUh 5 u : 
FF=INT íFF+FF/5): GO TO 300 
700 IF IA0 = i AND LASER=0 THEN P 
RINT "UOCE TEM UMA PT5T0LP IONIC 
H" : LET FF=4-*INT (FF/5): GO 
00 

7^0 Ir iAu=0 AND LA3tR=l THtN A 
RINT "UAI USAR 0 SEU LASER": LET 
rF=3*I NT i F F / 4-; : G 0 I u 3 0 O 

; QUE ARMA QUER USAR í 
2-LASER) ? JI ;Z 
ÜR Z>2 THEN 60 TO 7 


750 INPUT 
1 -PISTOLA; 
750 IF Z<1 


0 

770 
F / 5) 
730 

F/4-i 

790 

310 

320 


IF 


= 1 THEN LET FF=4.*IN 


T rF=3*IN 


l í 


THEN 


t 


REM 

REM 


0 "; m 


PR IN 



LET 


PR IN 
ENE 




*A LUTA* 

PRINT : PRINT 
IF RND > 5 THEN PRINT 
S; " ATACA-O 11 : GO TO 34-3 
3*30 PRINT "UOCE ATACA" 

34-0 GO SUB 35F0 
350 IF RND>,5 THEN PRINT 
T “UOCf CONSEGUE FERI-LO" 

F = INT Í5*FF/6) 

350 GO SUd '3550 
370 IF RND>.5 THEN PRINT 
T "0 INIMIGO AT INGE-0 ! M : 

RGIA =ENERGIA-5 

330 IF RND>.35 THEN GD TO 320 

RND*I6>FF THEN PRINT . P 

RINT "E UOCE CONSEGUE MATAR 0",M 
$: LET MM=MM+1: GO TO 310 
300 PRINT : PRINT "0 ";M*'"FSRt 
-0 FRAUEMENTE!": LET ENERGIA=INl 
(ENERGIA.-'2) 

310 LET R(SA,7>=0: Gü SUB 3ss0j_ 
PRINT : PRINT ; GO SUB 3S&0: KL 

TURN 

320 REM #*#*•*•**###*****»*** 

330' REM *DESCRICAO DRS SALA" 

P n _ 

+ ’ pRXM~T" r l 

M d# M M fF Ví i h H T ff 1| ■ * I» ■ ■ «i II ¥ K ■ * + > ■ í * ■ 1 V ' 1 

RINT 

950 FOR T =0 TO 13: IF 5A=T + i TH 
tN GO SUB 970+!*70; RETURN 
960 NEXT T 


94-0 PRINT : PRINT " * *********** 
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970 REM + + 

™ ¥ V H ■ ■ ■■ ¥ ¥ d" J ■* ■ d uh f + 14 ■■ l-d ¥•■ ¥¥ ¥¥ I > ¥■ ¥■ ■■ ■■ 

930 REM *ShLh 1* 

990 PRINT "UOCE ESTA*' NO AhT" 
CENTRO DE" 


r j 1 i 


1000 

1010 

EINO 

1020 
n 



1030 

104-0 

1050 

1050 


RTA r 


PRINT "RECREACAO" 

PRINT "UE EQUIPAMENTO DE TR 
EM GRA- " 

PRINT "UIDADE ZERO ESPALHAD 
AREA" 

RETURN 

REM i#^*.^.*..*.*.*********** 

DpM 1,1 ; = , Cl | p ^ 

PRINT" "ESTANAS OFICINAS D 
A MAUE" 

1070 PRINT "50 PODE ABANDONAR 0 
LOCAL ATRA- 1 ' 

1030 PRINT 11 UES DA GIGANTESCA Pü 

DO HAN-" 

1090 PRINT "GAP, A OESTE" 

1100 RETURN 

1110 RtM * * + * * ■* ± + * ^ * * * 

" P I P I 1 I h ■! gg | ■ | ■ | d |1 g.I. ig j ^ d ■ 

1120 REM *SALA 3* 

1130 PRINT "UOCE ENCONTRA-SE ND 
INTERIOR DP NAUE DESTRUÍDA," 

114-0 PRINT "UE DESTROÇOS POR tqd 
0 0 LADO,, " 

1150 PRINl "COMO St TIUtSSE HAUl 
DO UMA TER-” 

1150 PRINT "RIUEL EXPLOSÃO HA' M 
UITOS EONS" 

1170 RETURN 

1130 PtM * * * 4 * ^ * * * + 4- + Z- * i * * X * 4. 

-d ¥ g i ■■ ■ ■ ■ k p m 1 j m 4. p % | g p gg g ■ g 1 ■ 1 ■■ ■■ ■■ ■■ ■■ g 1 ■ 

1130 REM *5RLki 4-* 

1200 IF RND>.3 THEN PRINT “QUE U 
ISTfl SOBERBA!..." 

1210 PRINT "fi UISFIÜ GUE SE TEM D 
HS ESTRcLRS" 

1220 PRINT "NESTR PLATAFORMA DE 
OBSERUACAO E' MAGNIFICA. ..” 

1230 PRINT “50 PODE SAlK POR OND 
E ENTROU" 

124-0 RETURN 

1230 REM + 

d g ■ ■ 1 ■■ g ■ f p / y gTg. , , |i f g / gg IH gg ■ g ■■ ■■ g ■ ■■ ■■ ■■ 

1230 REM *SALA 5» 

1270 PRINT "A SUA FRENTE ESTEND 

EM-SE ACRES DE CULTURAS HIDRÜPON 
IC A3 11 

1230 PRINT ;, £H TEMPOS ESTA AREA 
ALIMENTAUA 05 MIL PASSAGEIROS D 


207 









A NAVE" 

1290 Ir RND>,b THEN PRINT 'AS LA 

MPADAS SOLARES ESTÃO AIW D A ACESA 

11 

1300 IF RND >.5 THEN PRINT "ALGUM 
RS PLRNTRS PARECEM RINDR UIURS 
PI E5TE" 

1310 RETURN 

1320 REM ^ ^ ^ ^ 

1330 *REM *SALA 5* 

134-0 PRINT 1 'VOCE ESTA LIVRE!" 
1350 PRINT '‘CONSEGUIU ESCAPAR? " 
1360 PRINT "0 VAIUtM ArASTA-St D 
A NAVE * . , " 

1370 PRINT "A SUA PÜNTUACAO E': 

• J j 3*RELRTÜRIÜ+5*ENÉRGIR+2*RI0USZ 

A+10*OXI+30*MM 

1330 STOP 

1390 REM 

' ~~T ^ Wf Hiijr 3 ¥ »•. : al I I ■ i f | ■ ■■ r I ■■ ■■ t ^ ■■ H I ■ k q ■ ■■ ■ h ■ ri 1 ■■ 

1400 REM *SALA 7* 

14-10 PRINT !l ENCONTRA-St NOS A 0 Ü A 
RTELAMENTOS DA TRIPULACAÜ" 

1420 Ir RND>.& THtN PRINT ,: GRAND 
E PARTt DÜS BELICHtS tSTAO VAZIO 


* m 


14.30 Ir PNC >.5 THEN PRINT "05 PO 
UC05 TPIPULHNTES OUE RESTRMMRNTt 
M-SE NO SEU SONO SEM FIM" 

14-4.0 IF RND > . 7 THEN PRINT "EXIST 
EM SflIDflS fi NORTE - ESTE E OESTE 


14-50 RETURN 
14-S0 Rr M 

I ' ¥ ■ ■■ | f tf ■ i | h ^ | i qi ^ ^ i|i ■■ ^ m ■■ r f 4" ■ I ■■ ■■ f ■ 

14-70 REM *SRLR 3* 

14-30 PRINT "ESTA' NO CENTRO DE R 
NIMRCRO SUSPENSA..." 

14-90 IF RND>.5 THEN PRINT "05 00 
RPOS DOS PfiSSRGEIROS FLU- TÜRM 

LIUREMENTE..." 

1500 IF RND >.5 THEN PRINT "0 DOR 
MITORIO E" ENORME. PARECE NRO T 

ER EIM» m , 11 

1510 IF * RND >.9 THEN PRINT "50 " E 
XISTEM SRIDRS R OESTE E fl SUL” 
1520 RETURN 
1530 REM 

■ T * ■ I ¥ ti i# i ■ ■ ■ ■■ 4 ■ ff f+ n t ■ i ^ i * t + ti IP ■ ' 

154-0 REM 43RLR 94 

1550 PRINT ”UOCE ENTROU NO HOSPI 


:_i '-i !j íj 

f ÜAM 

0 D 0 R 
N A 0 T 

SUL" 


1540 P 


AL DA NAVE,BRANCO E ESTERILI 


111 


t) 
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1560 PRINT "OUVE, VINDO DE SUL, 
UM SOM ES-" 

1570 PRINT "TRIDENTE, ACÜMPANHAD 
0 DE UMA 5ENSACA0 DE CALOR" 
1560 PRINT "DE NORTE PARECE VIw 
FRIO" 

1590 RETURN 


1600 REM ******************* 


1610 REM *SALA 10* 

1620 PRINT ,r A COMIDA DA TRIPULAC 
AO ERA PRE- PARADA AQUI” 

1630 PRINT "OS RESTOS DA ULTIMA 
REFEIÇÃO PO-DEM AINDA SER VISTOS 


1640 PRINT "EXISTE UMA SAIDA PAR 
A SUL E" 

1650 PRINT "OUTRA PARA OESTE" 
1660 RETURN 

1670 REM ******************** 
1680 REM *SALA 11* 

1690 PRINT "AHA! PARECE 0 VAIVÉM 
ESPACIAL!" 

1700 PRINT "OS INSTRUMENTOS PARE 
CEM INDICAR" 

1710 PRINT "OUE A PE0UENA NAVE b 
E ENCONTRA” 

1720 PRINT "EM PERFEITAS CONDIuO 
ES! " 

1730 RETURN 

1740 REM ******************** 
1750 REM *5ALA 12* 

1760 IF RND >.5 THEN PRINT "ESTA 

NA SALA DE- NAUEGACAO" 

1770 PRINT "VEEM-SE ESTRANHAS MA 
QUINAS AO LONGO DAS PAREDES, E 
MAIS ACIMA RODA LENTAMENTE UM M 
APA HOLOGRA-FICO" 

1730 PRINT "A REDUZIDA LUMINOSlD 
ADE E5VER- DEADfl MAL LHE PERMIT 
E DESCOBRIR AS SAÍDAS";: IF RND> 
.8 THEN PRINT "A SUL E ESTE" 

1790 PRINT 
1300 RETURN 

1810 REM ******************** 
1320 REM *SALR 13* 

1330 IF RND > »5 THEN PRINT "SENTE 
DORES AFLITIVAS NO CORPO!" 

1S40 PRINT "FOI APANHADO NUM CAM 


14 


209 




PO DE RRDIR-COES MORTAL! LENTRME 
NTE COMPRE- ENDE QUE ESTE E' O S 
EU FIM ..." 

1350 IF RND >.5 THEN PRINT "JA" N 
ADR PODE FAZER..." 

1360 IF RND >.5 THEN PRINT "ESTA' 
DESTINADO A MORRER AQUI!” 

1370 RETURN 

1330 REM * ********** 4 ******* 

1300 REM *SRLA 14-* 

1000 PRINT "ENCONTRA-SE NO CENTR 
O DE ENERGIADA NAUE" 

1010 PRINT "A CARACTERÍSTICA LUM 
INOSIDADE AZUL METALICA DOS MO 
TORES IONI- COS AINDA EM FUNCION 
AMENTO ENCHETODA A SALA" 

1020 PRINT "ATRAUES DE UMA ESTRA 
NHA NEVOR CONSEGUE VER PORTAS" 

: IF RND>.0 THEN PRINT "PARA NOR 
TE E OESTE" 

1030 IF RND>.6 THEN PRINT "UMA A 
BERTURA CONDUZ AO CENTRO DEMANUT 
ENCRG, MAIS ABAIXO" 

194.0 RETURN 

1950 REM ********************* 
1960 REM *SALA 15* 

1970 PRINT "ENCONTRA-SE NO ARMAZ 
EM DE AN- DROIDES" 

1930 PRINT "UE FILAS INTERMINAUE 
IS DE HOMENSMETALICOS, SILÊNCIOS 
OS, QUE ES-" 

1990 PRINT "PERAM OUVIR AINDA A 
VOZ DO SEU COMANDANTE MORTO HA' 
MUITO..." 

2000 PRINT "OBSERVA UMA LUZ A CE 
STE, E UM POCO DE GRAVIDADE AS 
ERTO NO PA- VIMENTO" 

2010 RETURN 

2020 REM ******************** 
2030 REM *SALA 16* 

204.0 PRINT "OUTRA SALA ENORME, C 
AVERNOSA, É PREENCHIDA COM MERCA 
DORIAS DE TODOS. OS TIPOS": IF 
RND>.7 THEN PRINT " METAIS RARO 
S E ESCULTURAS VE- NEZIANAS..." 
2050 IF RND>.3 THEN PRINt " PED 
RAS CINTILANTES DE-XARIAK IV... 


2060 IF RND>.7 THEN PRINT " REI 





S-CALAP 
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— 

J I 


XE CONGELADO DO 

IANO..." 

2070 IF RND>.9 THEN PRINT "A 
INOSIDADE E' MAIOR A 
2030 RETURN 

2090 REM ******************** 
2100 REM *SALA 17* 

2110 PRINT "UMA SALA DE PARED 


UM 


METALICAS " 

2120 PRINT "CHEIA DE ARMAS CUIDA 
DOSAMENTE ALINHADAS" 

2130 PRINT "EXISTEM SAÍDAS PARA 


OS SOLDADOS” 

214-0 PRINT "ANDROIDES A NORTE E 


A ESTE' 


2160 REM ******************* 

2170 REM *SALA 13* 

2180 PRINT "OLHANDO PARA CIMA VE 
O POCO DE GRAUIDADE QUE CONDUZ 
'A SALA D05H0T0RES" 

2190 PRINT "ESTA'' NO CENTRO Dc M 

ANUTENCAO" 

2200 PRINT "COM SAÍDAS PARA H SA 
LA DE ARMA—" 

2210 PRINT "ZENAMENTO DE ANDROID 
ES E PARA A SALA DE CARGA" 



2220 RETURN 

30 REM ********************* 

4.0 REM *SALA 19* 

PRINT "DESCOBRIU CA5URLMENT 
A SALA DE COMANDO DE EMERGcNCI 
A" 

PRINT "AS PAREDES ESTRO COB 
ERTAS DE VI-SORES COM IMAGENS Dt 
TODOS 05 PONTOS DA NAVE" 

PRINT "EXISTEM DUAS SAÍDAS. 




2230 IF RND>.5 THEN PRINT "UMA D 
RS QUAIS E' 0 POCO DE GRA- VIDAD 
E": RETURN 

2290 PRINT "UMA DAS QUAIS CONDUZ 
'A SALA DA CARGA" 

2300 RETURN 

2310 REM ******************* 

2320 REM *MORTE* 

2330 PRINT "VOCE GASTOU TODO 0 0 
XIGENIO..." 

234.0 GO SUB 3550 





2350 GO TO 1370 

2360 REM ** ***** ****** **** * ** 


2370 REM *GURRDRR RIQUEZAS* 

2350 IF A í SR, 7) <10 THEN PRINT M N 
RO EXISTE ROÜI NRDR DE UALOR": G 
O SUB 3550: RETURN 
2390 Ir LUZ =0 THEN PRINT "E5TA' 
DEMASIADO ESCURO PRRR UER" : GO S 
UB 3550: RETURN 

24-00 LET RIQUEZA=RIQUEZA+A Í5R , 7) 
24-10 LET R í SR , 75 =0 
24-20 RETURN 

24-30 KEM **************** *** 

24-4-0 REM *TENTATIUA DE FUGA SEM 
EXITO* 

24-50 PRINT "NRO, DEUE FICAR £ LU 
TRR " 

24-60 LET A$ = ,, L ,t 
24-70 GO SUB 3550 
24.60 GO TO 530 

24-90 REH + í 

2500 REM *ÜXIGE NIO* 

2510 CLS 

2520 IF 0XI<1 THEN RETURN 
2530 PRINT "TEM "; OXI; *' UNIDADES 
DE OXIGÉNIO" 

254-0 PRINT " QUANTAS QUER RDICION 
RR ROS DEPO-SITOS?" 

2550 INPUT Z 

2560 IF Z >0X1 THEN GO TO 2550 

2570 LET 0XI = INT ÍOXI-ZÍ 

2530 LET ENERGIA=INT (ENERGIA+5* 


570 LET 


590 GO 


UB 3550 


CLS 


2600 

2510 

2620 

2630 


RETURN 
REM ** 


REM 


O ■■ ¥■*■ ■■ T ■ V # if 1* ++ í* íí 14 Í 1 O f 1 » lí 1» 

*INICIALIZAR* 


254-0 LET ENERGIR-INT (RND*50> +75 
2650 LET RIQUEZA=INT (RND*50) +50 
2660 LET OXI=INT (RND*iS) 

2670 LET RELRTORIO =0 
2630 LET 00=0 

2690 LET MM=0: REM NU MERO DE RN 
DROIDES/ALIENIGENOS DESTRUÍDOS* 
2700 REM ********************* 
2710 REM *DEFINIR NAUE* 

2720 DIM A(19,7) 

2730 FOR B =1 TO 19 


T 
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274-0 FOR 0=1 TO 7 
2750 RERD A(B,C) 

2760 NEXT C 
2770 NEXT B 

2780 INPUT ,f 0UAL E" ü SEU NOME / 
COMRNDANTE? ";N$ 

2790 CL5 

2300 LET SR=3: REM *P05ICA0 INIC 
IRL ÍSR=N. DR SALA)* 

2610 LET LRSER=0 
2320 LET TRANS=0 
2330 LET IRO =0 
234-0 LET FRTO=0 
2350 LET LUZ =0 

2360 REM ******************** 

2670 REM *DTSTRIBUIR CRÉDITOS* 

2330 FOR J=1 TO 7 

2390 LET M=INT iRND*J?9)+1 

2900 IF M =6 OR M = li OR SR=13 OR 

flíM;7í O0 THEN GO TO 2390 

2910 LET AÜ1,7)=INT ÍRND*100)+10 

2920 NEXT J 

2930 REM ******************** 
294-0 REM +DI5TRIBUIR RLIENIGENOS 
/RNDROIDES* 

£950 FOR T =1 TO 2 
2960 FOR U =1 TO 4 
2970 LET M =INT ÍRND*13)+1 
2930 IF M =6 OR M = li OR M = 13 OR R 
(M,7> í > 0 THEN GO TO 2970 
2990 LET R ih,7)=-J 
3000 NEXT J 
3010 NEXT T 
3020 RETURN 

3030 REM ******************** 
3040 REM *ANDROIDE DE ASASTECIHE 
NTÜ* 

3050 PRINT "APARECEU UM ANDROIDE 
DE RBRSTE- CIMENTO" 

3050 GO SUB 3290 

3070 IF RIQUEZA<.l THEN LET Z=0: 
GO TO 3160 

3030 PRINT "UOCE PODE COMPRAR: 

1 _ LANTERNA NUCL 

EONICfl ($15) " 

3090 PRINT " 2 - PISTOLA JONIC 

R í $10) " 

3100 PRINT " 3 - LASER ($20) 

3110 PRINT " 4 - OXIGÉNIO ($2/ 
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TRANSPORTADOR 
($ 30 ) " 

FRTO DE COMBA 


UNIDADE)" 

3120 PRINT " 5 - 

DE MATÉRIA 
3130 PRINT " S - 
TE ($50)" 


314-0 PRINT “ 0 - CONTINUAR AUE 

NTURA" 

3150 INPUT "NUMERO DA OPCAO? ";Z 

3160 IF Z=0 THEN CLS : RETURN 

3170 IF Z=1 TMEN LET LUZ=I; LET 

RIOUEZA =RIOUEZA-15 

3130 IF Z =2 THEN LET IAO=l: LET 

RIOUEZA=RIOUEZA-10 

3100 IF Z =3 THEN LET LASER = 1: LE 

T RIOUEZA=RIOUEZA-20 
3200 IF Z=5 THEN LET TRANS=1: LE 
T RIQUEZA=RIOUEZA-30 
3210 IF Z =6 THEN LET FATO=l: LET 
RIOUEZA=RIOUEZA-50 
3220 IF RIOUEZA<0 THEN PRINT "TE 
NTOU ENGANAR-ME!": LET RIQUEZA=0 
: LET FATO=0: LET LUZ=0: LET IAO 
=0: LET LASER=Q: LET TRANS=0 : LE 
T OXI=INT (OXI/4-) : Gu SUB 35s0 
3230 IF Z<>4- THEN GO TO 3060 
324-0 INPUT "QUANTAS UNIDADES? 

Q: LET Q=INT (O) 

3250 IF 2*Q>RIQUEZA THEN PRINT " 
NAO TEM DINHEIRO SUFICIENTE": GO 
TO 324-0 

3260 LET ÜXI=OXI+Q 

3270 LET RIOUEZA=RIOUEZA-2*Q 
3230 GO TO 3060 

3290 IF RIOUEZA>0 THEN PRINT : P 
RINT : PRINT "UOCE TEM RIQUEZA 

■ *' CREDITOS 11 

3300 IF RÍOUEZR=0 THEN PRINT ,J NR 

O TEM CRÉDITOS 1 ’: GO SUB 3550: RE 
TURN 

3310 FOR J=1 TO 4-; PRINT : NEXT 

j 


3320 RETURN 
3330 REM ****** 

334-0 DRTR 015,2,0,0,0,0: 
R 1 

3350 DRTR 0,0,0,1,0,0,01 
R 2 

3360 DRTR 3,7,4-,3,3,3,0: 
R 3 


4 . ^ * u- 

T! I 1 f■ M 

REM 

REM 

REM 


SRL 

SRL 

SRL 




3370 DRTR 0,0,0,3,0,0,0: REM SRL 
R 4- 

3360 DRTR 1,5,7,5,5,5,0: REM SRL 
R 5 

3390 DRTR 6,6,6,6,6,6,0: REM SRL 
R 6 

34-00 DRTR 3,0,6,5,0,0,0: REM SRL 
R 7 

34-10 DRTR 8,12,8,7,3,8,0: REM SR 
LR 6 

34-2© DRTR 11,13,10,0,0,0,0: REM 
5RLR 9 

34.30 DRTR 0,14-,0,9,0,0,0: REM SR 
LR 10 

34*4-0 DRTR 9,6,6,5,6,6,0: REM SRL 
R 11 

34.50 DRTR 6,16,19,0,0,0,0: REM 5 
RLR 12 

34-60 DRTR 13,0,0,13,0,13,0: REM 
SRLR 13 

34-70 DRTR 10,0,15,17,0,16,0: REM 
SRLR 14- 

34-30 DRTR 0,0,0,14-, 0,19,0 : REM 5 
RLR IS 

34-90 DRTR 12,16,16,16,16,16,0: R 
Eh 5RLR 16 

3500 DRTR 14-, 0,13,0,0,0,0: REM 5 
RLR 17 

3510 DRTR 0,0,16,17,14-, 0,0: REM 
SRLR 16 

3520 DRTR 0,12,0,0,15,0,0: REM 5 
RLR 19 

3530 REM ******************* 

354-0 REM *flJUSTE O RTRRSO RO SEU 
GOSTO* 

3550 FOR Tal TO 90: NEXT T 
3560 RETURN 
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4 — Nomes aleatórios de locais e monstros 


Obriguei o meu computador a resolver a tarefa relativamente 
simples de produção de nomes para monstros. Eis o programa 
que utilizei: 


10 REH *GERRDOR DE NOMES* 

£0 RRNDOMIZE 
30 DIM ZíS) 

4-0 FOR T = 1 TO 5: RERD Z <T) í NE 
XT T 

50 FOR H = 1 TO 4* 

30 FOR T = 1 TO 4- + INT íRND*4.) 

70 LET 5=0 

30 LET fl=66 + INT <RND*25) 

90 IF RND>.7 RND ÍR=59 OR R=73 
OR h = 79 OR ft =35) THEN GO Tü 80 
100 IF (T=2 OR T =5 OR T=7> THEN 
LET B =Z íINT <RND*5)+1> 

110 IF B<>0 THEN PRINT CHRÍ 5;: 
Qn t n 130 

120 PRINT CHR$ R; 

130 NEXT T 
14-0 PRINT " 

150 NEXT H 

150 PRINT 

170 GO TO 50 

130 DRTh 65,69/73,79,35 


Vejamos agora alguns dos resultados que obtive com este pro¬ 
grama (eliminei os menos interessantes). Talvez alguns destes 
nomes sejam úteis ao leitor» tanto para designar monstros como 
para identificar locais míticos: 


LAQH 

REBLEP 

IAMD 

TIGNEZA 

QOUHEXE 

PISBI 

OAKHO 

BIHLA 

GEDIE 

CISWAH 

VELN 

NEYH 

GOJUO 

PAWTOZI 

NAOJM 

MEDSA 

TEHOOVO 

GAMLO 

BEDO 

HEZBI 

MEZPO 

KISC 

MANMY 

KOMNOMO 

JELM 

LESH 

YXPHI 

VEDLE 

EANBENG 

YIOC 

DOXT 

F AT GE KA 
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BEZMAZI 

LIIYEX 

NIGRAP 

H0PN0G 

5 — Endereços úteis 

COLOAZ 

SALUENI 

NEY0KEE 

L0BIEBE 


P0GW0R 

ROKVA 

P0YN0Z 

G0DWUR 

EDITORES DE JOGOS DE AVENTURAS NOS ESTADOS 

XEZKE 

JEBJO 

NEYMEO 

WOOF 

UNIDOS: 

RECCI 

XEVFI 

MID0 

MATWEO 


G0UL 

KEBGA 

CEXFAV 

JEXV 

Adventure Games, Inc., 871 Edgerton St., St. Paul, Minnesota 

SS 101 

ZAHNIL 

OIYYI 

FEBSEX 

Z0NHIP I 

J X V .1 f 

JAPDANZ 

QINNAYP 

VEBXOI 

L0CQI 

Chaosium Inc., PO Box 6302, Albany, Califórnia 94706. 

P0BLIP 

GOLJEB 

IERVO 

COER 


CIKWAB 

TEE0AF0 

ZARW 

FAHSEYA 

Fantasy Games Unlimiled, PO Box 182, Roslyn, Nova Iorque 

H0KM 

DIRI 

GEXNAC 

HEHK0 

11576. 

X0E0PU 

BIRWAI 

YEQMIIE 

SAFW0LI 


FIDWIY 

PAWK 

DAHI 

C0JJ0LA 

Flyíng Buffalo Inc., PO Box 1467, Scottsdale, Arizona 85252. 

VINPERO 

XITFO 

JEMR 

M0XK0 

Games Designers' Workshop, PO Box 1646, Bloominglon, 11- 

TEYLENO 

LERE 

DOQKII 

V0CV0F 

A ■ t kr * 

linois 61701. 

ZIZS 

PAFXI 

YOXLO 

NISL 


RAJYOR 

WACNA 

YALDAR 

8IDBIF 

Gamescience, 01956 Pass Road, Gulfport, Massachusetts 

POLVO 

LYMC 

TERC 

WAFM0K 

39501. 

XENTADN 

REZN 

WILTEG 

DINW0L 


GEYP 

CINOOCA 

QABYI 

W0KIA 

Grimoire Games, PO Box 4363, Bcrkeley, Califórnia 94704. 


Heritage USA, PO Box 345125, Dallas, Texas 75234. 


Hero Games, 425 Harbor Boulevard, Belmoni, Califórnia 
94002. 

Metagaming, Box 15346, Austin, Texas 78761. 

Simulations Publications Inc., 256 Park Avenue South, Nova 
Iorque, NY 10010. 

Task Force Games, 1110 N, Fillmore, Amarillo, Texas 79107. 

TSR Hobbies lnc., PO Box 756, Lake Geneva, Wisconsin 
53147. 

Yaquinto Publications Inc., PO Box 24767, Dallas, Texas 
75224. 
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Avalon HiJl Games, 650 High Street, North Finchley, Londres 
N120NL. 

Citadel Miniatures, 10 Victoria Street, Newark, Nottinghams- 
hire. 
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dlands. 

Games Workshop Ltd., 1 Dalling Road, Londres, W6; 27-29 
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